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Merci décrire en majuscules. 
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FAITES 36.15 ET TAPEZ MHZ 



CE QUE VOUS OFFRE 
NOTRE SERVICE SUR MINITEL 



Nous disposons d'un service MINITEL 

que de nombreux lecteurs connaissent bien maintenant. 

Outre l'information diffusée, 

il devient un instrument de dialogue permanent 

entre vous et notre rédaction. 



NOS REVUES 



Dès que la revue est chez l'imprimeur, le 
sommaire apparaît sur la page concernée. 

Le lecteur peut également y trouver la liste 
des produits spécifiques à sa revue (dis- 
quettes, cassettes, livres). 



LA BOITE AUX LETTRES 



Déjà utilisée par des lecteurs de CPC et de 
Mégahertz, elle vous permet de poser vos 
questions techniques chaque jour - 24h sur 
24h - sans avoir à attendre que la ligne de 
téléphone soit libre les mercredi et vendredi. 

Les correspondances sont relevées chaque 

jour! 

De plus, vous pouvez, entre lecteurs, écrire, 

recevoir des messages, faire des échanges 

techniques. 

Les boîtes à lettres sont ouvertes sous votre 
pseudo aux normes télématiques. 



LES PETITES ANNONCES 



24h sur 24h, 7 jours sur 7, elles sont acces- 
sibles. Nous venons d'améliorer ce service. 
Depuis le 1er janvier 1987, c'est chaque 
jour que les annonces sont mises en place. 
De plus, vous pouvez DIRECTEMENT pas- 
ser vos annonces sur le serveur. 



DES INFORMATIONS 



Des informations sont à votre disposition et 
régulièrement mises à jour, ainsi que les 
éventuelles corrections de listings en cas 
d'erreur. 



NOS PRODUITS 



Nos nombreux revendeurs peuvent utiliser 
le MINITEL pour passer commande. L'en- 
semble des produits disponibles est présen- 
té. Nous avons simplifié au maximum la pro- 
cédure. Lecteurs et revendeurs peuvent aus- 
si vérifier si le produit est disponible et quel 
est son prix de vente public. 



Au téléphone, 1 5 minutes coûtent en moyenne 55 F. Par le minitel, pour le même temps, ï vous coûte en moyenne 15 F. 
te bon choix, c'est 361 g et MHZ I 



36.1 5, TAPEZ MHZ 
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DISCOLOGY 



3.0 



La performance au service de votre Amstrad. 

Editeur-f- Copieur-|- Exploreur-|- 



Ultra rapide : 150 Ko de Langage Machine, 
Fenêtres, Menus déroulants, Aide intégrée, 
Manuel de 24 pages + Additif technique. 
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Un Editeur secteur unique qui vous 
permet de visualiser et de modifier 
le contenu de toute disquette, 
qu'elle soit protégée ou non. 



Quatre modes d'édition combinant Ascii, hexa, décimal, octal, binaire. 

□es capacités exceptionnelles que vous pouvez exploiter immédiatement : 

• Désassemblage direct des programmes en Langage Machine 

• Listage automatique des programmes Basic 

• Les outils de bureau : ciseaux, colle, calculatrice mathématique 



routes les possibilités à la portée du débutant comme de l'expert : 
Récupérer une disquette endomagée ou un programme effacé 
Explorer un directory, le reparer, le modifier 
Localiser des fichiers, les cacher, les visualiser, les modifier 



UULCÎ> 

I: 



LE copieur 

ï : 



Enfin la copie de sauvegarde pour toutes vos 
disquettes (et cassettes) protégées ou pas. 

omme l'Editeur, il reconnait 99 pistes, toutes 
les densités d'écriture, les pistes déformatées, les 
ecteurs non standard, effacés ou de taille anormale. 




Des performances inédites à votre service : 
Réparation automatique des secteurs endomagés 
Gestion automatique des extensions mémoire 
Une fonction catalogue qui permet de copier des 
fichiers séparément sur cassette ou disquette. 




I/EXPLOREU* 



l 



Voyage au centre de la disquette... 
L'Exploreur de Discology fournit toutes 
les informations sur la disquette : 
Formatage, densité d'écriture, caractéristiques des 
secteurs, secteurs "plantés", plan d'occcupation des 
fichiers sur la disquette. 



cachées 




Un outil passionnant pour découvrir tous les 
secrets de vos disquettes et du contrôleur disque. 

Pour tous les "cracks" de l'Amstrad et ceux qui 
veulent le devenir. 
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Discology est disponible sur disquette pour Amstrad CPC chez tous les très bons revendeurs. Vous pouvez aussi le commander 
directement sans frais de port supplémentaires à : MERIDIEN INFORMATIQUE, 5 et 7, La Canebière - 13001 Marseille. 

• Master Save est toujours disponible au prix de 190 F. Il reprend Les caractéristiques du Copieur de Disquette de Discology 

• Si vous désirez recevoir Discology et que vous possédez déjà Master Save, vous ne payez que la différence. 



BON DE COMMANDE]^ 



O JE DESIRE RECEVOIR DISCOLOGY AU PRIX DE 350 F vjERS/Oty I L-» <— " " ' ^~ "O 

O JE DESIRE RECEVOIR MASTER SAVE AU PRIX DE 190 F ^3.0 _ ■■■■■■■1^^^^^^^^^^^^^^ Q 

O JE POSSEDE DEJA MASTER SAVE ET JE DESIRE RECEVOIR DISCOLOGY. JE JOINS MA DISQUETTE MASTER SAVE ET JE NE PAYE QUE 160 F^ 



MON REGLEMENT 



NOM 



O CHEQUE QUE JE JOINS (LE PORT EST GRATUIT) 



O CONTRE REMBOURSEMENT (J'AJOUTE 25 F DE FRAIS DE PORT) 
PRENOM : 



ADRESSE : _ 
CODE POSTAL 



VILLE 



TEL (facultatif) 



A retourner à : MERIDIEN INFORMATIQUE, 5 et 7, La Canebière - 13001 Marseille. 





COURRIER 
DES LECTEURS 



Les questions que vous nous posez, les problèmes que 
vous nous soumettez dans votre courrier couvrent tous 
les champs d'application du CPC. Il était dommage que 
les réponses restent individuelles. Nous ouvrons donc 
cette rubrique qui traitera des cas les plus fréquemment 
rencontrés et des problèmes dont nous pensons qu'ils 
sont d'ordre général et dont les solutions pourront 
apporter une aide précieuse à nombre de lecteurs. 



Lucien RAUJOT 77220 Gretz Roland PIERRE 56250 Elven 



J'achète régulièrement les disquettes de 
CPC. Comment dois-je faire pour sépa- 
rer les programmes (jeux, éducatifs, uti- 
litaires) sur d'autres disquettes ? 

fl est très facile de regrouper les 
programmes à votre convenan- 
ce. Pour chacun d'entre eux, il vous 
faudra, toujours en vous référant à 
l'article correspondant de la revue, 
identifier tous les fichiers entrant dans 
sa constitution et les transférer sur une 
disquette que vous aurez formatée en 
Data. 

Je ne m'en sors pci avec les listings de 
la série CAO sur CPC. 

Dans un souci de simplification 
nous appelons sur nos disquet- 
tes les différents fichiers de cette série 
CAOl, CAC)2 etc. Il est bien évident 
qu'il convient de les regrouper sur une 
disquette en les renommant conformé- 
ment aux différents articles de la série. 

On m'a offert des cassettes de jeu. Com- 
ment les transférer sur disquette pour 
mon 6128 ? 

£a plupart des cassettes de jeu 
sont protégées contre le pira- 
tage et leur transfert sur disquette 
nécessite l'utilisation d'un boîtier péri- 
phérique spécialisé tel que Mirage 
Imager. Mais attention, l'utilisation 
du jeu à partir de la disquette nécessi- 
tera également le raccordement de ce 
dispositif à votre 6128. 



J'ai toujours un problème avec le pro- 
gramme de recherche documentaire du 
n° 22. Quand je veux modifier ou sup- 
primer un document, le programme 
"plante" définitivement. Après plusieurs 
sorties du listing sur'imprimante, je n'ai 
pas encore réussi à trouver l'erreur. Si 
personne d'autre n'a encore signalé cette 
erreur, il s'agit certainement d'une faute 
de frappe de ma part et n'en tenez pas 
compte. 

4 notre connaissance, ce pro- 
gramme ne comporte aucune 
erreur. Puisque vous avez la chance 
d'avoir une imprimante, comparez 
vote listing ligne à ligne avec celui de 
la revue, en vous faisant aider, si pos- 
sible, par une autre personne. 

Passionné de généalogie, un programme 
sur ce sujet est-il possible à traiter ? 

Nous avons publié dans le n° 10 de 
CPC, un programme écrit par Gérard 
CLAVREUL et intitulé Arbre généa- 
logique. 



m 




_ ras 

CHARGEUR HEXA 

Annie ROUSSEAU, de Compiègne, s'in- 
quiète de savoir comment et à quel 
endroit entrer les codes hexadécimaux 
du programme Ibis du jeu de Mille Bor- 
nes de CPC 24. 



£c listing 1 de Mille Bornes est 
ce qu'on appelle un chargeur 
de codes hexadécimaux. Le BASIC 
ayant ses limites, notamment en rapi- 
dité, les auteurs de programme sont 
parfois appelés à écrire certaines par- 
lies de ces programmes en langage 
d'assemblage qui, contraitement au 
BASIC, qui a besoin d'un interprète 
(interpréteur), sera directement com- 
pris par la machine. Il n'est, bien sûr, 
pas possible d'entrer ce langage par le 
BASIC (on utilise pour cela un assem- 
bleur). Tout le monde ne possédant 
pas un de ces programmes assem- 
bleurs, l'astuce consiste donc dans le 
codage des données du programme 
assembleur en valeurs hexadécimales 
(base 16) et à leur implantation directe 
dans la mémoire de l'ordinateur aux 
adresses adéquates. Cette partie de 
programme, une fois implantée, sera 
appelée pat la commande BASIC 
"CALL". 

Il s'agit donc, dans la pratique, d'en- 
trer le listing 1 de Mille Bornes et de 
le sauvegarder, puis de le lancer. Vous 
pourrez alors entrer les codes HEXA 
du listing Ibis qui seront vérifiés auto- 
matiquement ligne à ligne. A la fin de 
la saisie, la sauvegarde est automati- 
que. 

RSX 

Ralph FUCHS de Metz demande si, 
dans France Rivières de CPC Hors Série 
4, les mots précédés d'une barre verti- 
cale (SHIFT + q) sont bien des comman- 
des BASIC. 

Ces mots sont des RSX - exten- 
sions résidentes du système - et 
correspondent à des commandes 
BASIC (en RAM) qui viennent s'ajou- 
ter aux commandes de la ROM. 
Il est ainsi possible de programmer 
une commande IBOX qui dessinera un 
rectangle ou IDPOKE qui "pokera" 
des valeurs sur deux octets (voir ces 
deux commandes dans RSX à GOGO, 
CPC 16). Ces nouvelles fonctions, 
réduites à un mot et d'éventuels para- 
mètres, augmentent donc la puissance 
de votre BASIC. Pour plus de rensei- 
gnements sur les RSX, voir COM- 
MENT CONSTRUIRE UNE RSX 
dans CPC 14. 

ÇA NE MARCHE PAS ! 

Maurice PICARD, de Tours, se bat avec 
un programme qui s'obstine à ne pas 
vouloir fonctionner. 



fl n'est pas le seul à rencontrer 
ce type de problème, une bon- 
ne part du courrier fait état de tels 
ennuis. Alors, pour que nos lecteurs 
ne s'arrachent pas les cheveux (du 
moins pas trop !), voici quelques con- 
seils de base que nous ne répéterons 
pas ! 

Avant toute saisie, s'assurer que le 
programme s'adresse bien au type de 
CPC que vous possédez. Une petite 
croix en correspondance dans la 
vignette sous le titre vous assure une 
compatibilité sans faille. Ensuite, et ce 
point est extrêmement important, lire 
et relire le texte de présentation. De 
nombreux renseignements cruciaux y 
figurent souvent. La saisie peut alors 
commencer. On veillera à ne pas con- 
fondre les caractères, notamment 1,- 1 
et I ou encore O et et même 8 et B. 
D'une manière générale, efforcez-vous 
de saisir le programme à l'identique. 
Ne modifiez pas les numéros de ligne, 
ne supprimez pas les lignes de REM, 
un branchement peut y être effectué. 
Respectez le type de caractères (majus- 
cule, minuscule). N'oubliez pas que 
lorsqu'un message d'erreur pointe une 
ligne correcte, c'est que l'erreur se 
trouve en amont dans le programme 
(cas fréquent avec IMPROPER AR- 
GUMENT ou TYPE MISMATCH. 
Enfin, n'hésitez pas à utiliser le pro- 
gramme anti-erreurs qui est le meilleur 
gage de réussite dans la saisie. Mais il 
n'est opérationnel que depuis les der- 
niers CPC. Il vous faudra donc, pour 
les numéros antérieurs, redoubler de 
vigilance. 

PHOTOCOPIES 

Le même lecteur nous demande de lui 
envoyer un certain nombre de photoco- 
pies de listes de programmes et souhai- 
terait que nous lui procurions la nomen- 
clature détaillée des CPC 5, 6, 8, 12 etc. 
(14 numéros) 

£a demande en photocopie est 
tellement forte que si nous y 
répondions, le secrétariat y travaille- 
rait à plein temps. Pas de photocopies, 
donc. Quant à la nomenclature des 
articles parus dans CPC, il suffit, pour 
la consulter, de lire les pages centra- 
les de CPC 19 qui concerne les numé- 
ros 1 à 17. 

TABLEAUX DE VARIABLES 

P. SAINLEGER, de Ste Maure de Tou- 
raine, nous suggère de publier avec les 
programmes, la liste des variables 
correspondantes. 




Bff ous essayons d'obtenir de nos 
■ W auteurs, qui sont souvent des 
lecteurs, le tableau des variables de 
leur programme. Certains semblent 
ressentir quelque difficulté à le dres- 
ser, d'autres présentent un pro- 
gramme parfaitement commenté. 
Sachez, si vous êtes un auteur en puis- 
sance, que la préférence peut être don- 
née à un programme dont le commen- 
taire est précis. En outre, il est dans 
l'intérêt même du programmeur de 
dresser la liste de ses variables 
AVANT de passer à l'écriture du pro- 
gramme. Cela apporte une plus 
grande maîtrise de l'écriture et prouve 
que l'on domine son programme et 
non l'inverse. 

CONSEILS D'ACHAT 

M. Claude PAYRE, de la Seyne-sur-Mer, 
voudrait apprendre l'assembleur mais ne 
sait ni quel programme ni quel ouvrage 
se procurer. 

fl nous est impossible de répon- 
dre à ce type de question autre- 
ment qu'en adressant la liste des pro- 
grammes ou/et des ouvrages existant 
sur le sujet, ce qui serait parfaitement 
vain. Il reste qu'il est possible de con- 
sulter les bancs d'essai de programmes 
parus dans CPC ainsi que la rubrique 
LA VITRINE DU LIBRAIRE qui 
peuvent aider utilement l'acheteur 
potentiel. 

PETITES ANNONCES 

Claude DEMONGEOT, de Tautery nous 
demande de lui venir en aide dans son 
aventure à bord du paquebot de MEUR- 
TRES SUR L'ATIANTIQUE. 

^m oilà le type même de question 
W à poser par l'intermédiaire des 
petites annonces de CPC. Les P. A. ne 
constituent pas seulement le meilleur 
moyen de vendre et d'acheter du maté- 
riel, elles sont encore une ouverture 
sur une relation directe avec d'autres 
lecteurs et, parfois, l'ultime moyen 
d'obtenir la réponse à un problème 



épineux. A vous d'en faire un rendez- 
vous suivi et même couru. 

EN FRANÇAIS S.V.P. 

Robert COSTE, de la Seyne-sur-Mer 
regrette l'emploi, dans certains program- 
mes, de termes anglo-saxons. 

Ml ous avons eu la chance, dans 
■ W notre beau pays, de bénéficier, 
aux premiers balbutiements de la 
micro-informatique, de traductions 
des termes techniques de notre passe- 
temps favori. Utilisons-les de préfé- 
rence" aux autres, tout le monde ne 
parle pas l'anglais. Le français, oui ! 
Les choses sont suffisamment hermé- 
tiques en informatique, facilitons au 
moins la communication ; n'en rajou- 
tons pas. "Je charge le drive avec le 
floppy et je boote le DOS", vous a un 
de ces airs faussement professionnels 
qui confinent à la puérilité. Passons 
outre et restons simples. 

CONNECTEURS 

Etienne KNALL-DEMARS, de La Force, 
vient d'acquérir un CPC 6128 AZERTY 
et s'étonne de la modification des con- 
necteurs d'extension. 

£n effet, les derniers modèles 
AZERTY de la firme AMS- 
TRAD nécessitent l'emploi de nou- 
veaux câbles de liaison. Une char- 
mante attention à laquelle seront sen- 
sibles les possesseurs d'un modèle 
QWERTY qui ont imprimante et lec- 
teur de disquette et qui avaient envi- 
sagé de le remplacer par la nouvelle 
merveille. Mais ne désespérez pas. Il 
existe des adapteurs commercialisés 
par Bretagne Edit Presse (voir catalo- 
gue dans CPC). 

HUMEURS 

Un lecteur, que nous n'aurons pas la 
cruauté de nommer ici, nous conte ses 
déboires avec le programme anti-erreurs 
et termine en nous affirmant que ce pro- 
gramme est tout à fait inintéressant. Sui- 
vent six signatures curieusement 
semblables... 

Un exemple typique de refus 
d'auto-critique. On ne lit pas 
les commentaires du programme, on 
passe des heures à saisir un pro- 
gramme antérieur à la publication de 
l'anti-erreurs, d'autres heures à tenter 
de comprendre le pourquoi du non 
fonctionnement et le verdict tombe : 
ce programme n'a aucune portée ! 
Avant de douter de votre revue, voyez 
si, par hasard, vous n'auriez pas une 
pierre dans votre jardin» 
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CREATION 

ET ANIMATION 



DE SPRITES 



Michel MAIGROT 



Composition des 4 pixels de gauche à 
droite. 




Organisation 
de la mémoire écran 

A - Adressage écran 

Le sujet ayant déjà été traité dans CPC 
n° 16 p. 24, je me contenterai d'y ajou- 
ter un complément sous la forme du pro- 
gramme SCRNMAP.BAS, qui établit une 
carte complète de la mémoire écran. 

B - Nombre de pixels disponibles selon 
le mode. 

L'écran dispose d'une résolution verti- 
cale de 400 lignes, or le système n'en 
adresse que 200. Quel est donc ce 
mystère ? Essayez donc la ligne BASIC 
suivante : 

10 FOR Y-0 to 399:PL0T 200,Y,1:NEXT 
Une ligne se dessine sur la hauteur de 
l'écran. Maintenant, essayez : 
10 FOR Y-0 to 399:STEP 2:PL0T 300,Y,1:NEXT 
Surprise, la ligne est identique, mais se 
trace beaucoup plus rapidement. Ceci 
nous permet de constater que deux 
points de l'écran sont adressés simulta- 
nément dans le sens vertical et introduit 
la notion de PAS DE DEPLACEMENT. La 
résolution verticale restant inchangée 
dans les 3 modes, ce dernier SERA TOU- 
JOURS DE DEUX. 

Les choses se compliquent dans le sens 
horizontal. (Pas de mauvaises pensées, 
SVP I) 
Nous disposons de 80 cases mémoire de 

1 octet chacune et de 640 positions pos- 
sibles soit 8 pixels * 80 cases. En mode 

2 : 

10 FOR X-0 to 639:PL0T X,100,1:NEXT 
Trace une ligne en travers de l'écran. 
Ajouter une instruction STEP, 2 tracera 
un pointillé. On en déduit donc que dans 
1 octet: 1 bit mis = 1 point allumé à 
l'écran : POKE &CO00,&X10101010 
allumera un pointillé en haut à gauche de 



l'écran. Essayez avec différentes valeurs 
binaires pour étudier le résultat et 
souvenez-vous qu'en BASIC, les valeurs 
de PAPER ou PEN sont exclusivement 
pixel éteint et 1 pixel allumé. 

EN MODE 2 LE PAS DE DEPLACEMENT 
SERA DE UN AVEC 639 POSITIONS 
POSSIBLES. 

En mode 1 , nous avons 4 couleurs simul- 
tanées pour PAPER - PEN (0 à 3) soit 
00,01,10,1 1 en binaire. Deux bits sont 
donc nécessaires pour attribuer un stylo. 
Quoi que l'on fasse, un octet n'accep- 
tera jamais que 8 bits, il devient donc 
nécessaire d'allumer deux points écran 
simultanément et nous ne disposerons 
plus que de 4 pixels au lieu de 8 par octet 
écran. 8/4 = 2. Vérifier en ajoutant step 
2 à la ligne 10. 

EN MODE 1 LE PAS DE DEPLACEMENT 
SERA DE DEUX AVEC 31 9 POSITIONS 
POSSIBLES. 

En mode 0, c'est de 1 6 stylos simulta- 
nés dont nous disposons, donc de à 
1111 en binaire soit 4 bits. En suivant 
le raisonnement précédent, nous voyons 
qu' 

EN MODE LE PAS DE DEPLACEMENT 
SERA DE QUATRE AVEC 159 POSI- 
TIONS POSSIBLES. 

Notez que dans le calcul des coordon- 
nées X & Y le est inclusif. 

C - Codage des couleurs 

En mode 2, pas de problème : bit à 1 = 
couleur affectée à PEN 1 , bit à couleur 
affectée à PEN O. 

En mode 1 , les couleurs de à 3 sont 
codées comme suit : 



PIXEL A B 
BITS : 3&7 2&6 
VALEUR : 1 11 
PEN : 1 3 


C D 
1&5 0&4 
10 

2 


Remettons les choses en 


ordre : 


BITS : 7 6 5 4 3 210 
OCTET : 10 1101 


- 196 décimal 



MODE 1 : POKE &C000, &X1 10001 10 
pour voir le résultat. 

En mode 0, le codage des couleurs de 
à 1 6 se réalise comme suit : 



PIXEL 
BITS 
VALEUR 
PEN 


GAUCHE 

1-5-3-7 

0110 

6 


DROITE 

0-4-2-6 

1010 

10 


L'octet 


recomposé : 




BITS 
OCTET 


: 76543210 
: 00101101 


- 45 décimal 



MODE : POKE &C000, &X00101 101 

Le programme "PIXELMAP" est conçu 
pour mettre en évidence ces particulari- 
tés. En mode 1 & 2, vous pouvez entrer 
les codes directement en binaire ou en 
décimal. Si l'hexadécimal vous tente, 
précédez la valeur de "H". En mode 0, 
les entrées ne sont acceptées qu'en déci- 
mal. Dans les 3 modes, donner - 1 ren- 
voi au menu. 

QU'EST-CE 
QU'UN SPRITE ? 

Le SPRITE (Lutin in french), peut être 
défini comme une longue liste de 
DATAS. Elle contient les codes couleur 
de chaque case mémoire d'une image 
destinée à être représentée à l'écran. 
Cette dernière devant, de préférence, 
affecter la forme d'un rectangle, les hau- 
teur et largeur de chaque dessin devront 
donc, obligatoirement, être connues du 
programme exploitant. Dans le cas où les 
dessins d'une table sont de taille diffé- 
rente, les dimensions de chacun seront 
incluses dans la table ainsi que quelques 
octets supplémentaires (3 dans le cas de 
SURGENE). Ces 3 octets sont dans la 
plupart des cas, un gaspillage de 
mémoire, mais dans des cas bien précis, 
(contrôle d'affichage, rang de priorité, 
miroirs, collisions etc.) ils éviteront 
d'avoir à recourir à une table d'état et de 
jongler avec des pointeurs supplémen- 
taires. 

Avantages du SPRITE : 

Il permet l'affichage, le déplacement ou 
la modification d'un motif multicolore de 



taille quelconque. Cela de toutes les 
manières possibles et imaginables. C'est 
la seule manière concevable de réaliser 
une animation de qualité. 

Inconvénients . 

Bien que théoriquement réalisable en 
BASIC, le procédé demanderait des rafa- 
les de PEEK et POKE à l'intérieur des 
boucles FOR NEXT. Vous auriez le temps 
de lire plusieurs pages de votre revue 
favorite avant qu'un motif de quelques 



Dans ce cas, vous devrez créer 2 tables. 
La première d'intervalle fixe contenant 
30 envahisseurs, la seconde d'intervalle 
variable, contenant la base et votre 
chasseur. 

STRUCTURE 
ET EXPLOITATION 

D'UNE TABLE A 
INTERVALLES FIXES 

, X est une constante égale à la dimension 
du plus grand sprite utilisé. 



SPT1 SPT2 SPT3 SPT4 SPT5 r le 

ADSP - - > ! ! ! ! ! ! ! 

X X X X X X 



ADSP = adresse où commence la table 
en mémoire. 

.Détail d'un sprite : 




01 



! !__ j 

02 03 Hauteur Longueur 



Dl 



D2 Etc 



pixels ait fait le tour de l'écran. Dom 
LANGAGE ASSEMBLEUR OBLIGATOI 
RE. 

Gourmande en mémoire, la méthode 
exige le choix d'une programmation par- 
faitement adaptée à l'application souhai- 
tée. De nombreuses possibilités d'anima- 
tion vous seront présentées par la suite. 
Un programme spécial doit être utilisé 
pour créer les dessins, il a été publié dans 
les numéros précédents. (Pas trop usés, 
les doigts ?...) 

La première décision à prendre sera l'or- 
ganisation de la table de données. 2 solu- 
tions sont possibles : 

Table à intervalles fixes 

Cette organisation impose un intervalle 
constant entre chaque série de données. 
Si vos sprites sont tous de dimensions 
égales, son rendement sera optimum car 
l'accès aux données sera aussi rapide 
que possible. Si les différences entre 
taille maximum et minimum sont de l'or- 
dre de quelques octets, vous gaspillerez 
un peu de place en mémoire. Mais avec 
des lignes de 100-200 octets et d'autres 
de 10, la solution 2 est la seule 
envisageable. 

Il existe aussi un terme intermédiaire : 
supposons qu'un jeu d'arcade soit basé 
sur le principe suivant : 
Une base d'envahisseurs représentée par 
un dessin de grande taille, libère un grand 
nombre de chasseurs de forme différente 
mais de même dimension (disons 30 
sprites de 10 * 10 pixels), destinés à 
détruire votre vaisseau qui, lui, est de 
taille moyenne, (vicieux, n'est-ce pas ?) 



01, 02, 03 3 octets réservés pour 
usage divers. Les dimensions H & L de 
chaque rectangle étant les mêmes, il est 
donc inutile d'aller les chercher dans la 
table. Je ne les ai pas représentés ici car 
ils sont systématiquement inclus par 
SURGENE. D 1 = Code de la première 
case écran à remplir, D 2 de la seconde 
etc... 

Exemple de recherche dans une table de 
ce type : 



maille de la grille représente un pixel. Si 
ces propos vous laissent perplexe, 
revoyez le chapitre mémoire écran. 
Ensuite, pour créer votre table, utilisez 
toujours les MEMES DIMENSIONS DE 
GRILLE et lors de la sauvegarde, l'option 
GRILLE COMPLETE. Avec cette option, 
les lignes et colonnes vides sont consi- 
dérées comme faisant partie du 
rectangle. 

Le coin en haut à gauche de la grille 
représente le premier pixel de la première 
ligne du rectangle. Si votre sprite ne rem- 
plit pas la grille, déplacez-le sur ce point 
avant la sauvegarde, cela vous facilitera 
la vie (sauf cas particuliers dont on 
reparlera). 

Si vous prenez la précaution de créer des 
dessins selon la formule : longueur de la 
grille / nombre pixels dans une case = 
résultat entier, vous allégerez considéra- 
blement le travail de programmation ulté- 
rieur. Notamment si vous désirez réali- 
ser des effets de miroir. 
En effet, le plus petit dénominateur est 
un octet complet. Si la dernière case 
mémoire du lutin n'est pas entièrement 
utilisée, SURGENE complète avec 1 ou 
plusieurs pixels de stylo 0. Un décalage 
dont il faudra tenir compte si l'on veut 
juxtaposer 2 sprites sans laisser une 
bande de pixels de la couleur du papier 






LD A, NUMERO DU SFRITE RECHERCHE 




LD DE, LONGUEUR D'UNE ZONE DE DONNEE 




LD HL.ADRE33E DE LA TABLE 


BOUCLE 


DEC A 




JR r . TROUVE 




ADD HL.DE 




jr BOUCLE 


TROUVE 


•l tze point HL pointe sur 1* 




INC HL sur OZ 




INC HL sur 03 




If'C HL sur M 




INC HL sur L 




INC HL sur la 



(Constante a i 
IAD=,P ) 



AESF=AD3P* 



sur l'octet 01 du sprite r-eenerche 

sur OZ 

sur 03 

sur H 

Sur L 

Sur !d première case du sprite 



Les opérations d'affichage peuvent 
commencer. 



SURGENE est initialement conçu pour 
générer des tables à intervalles variables, 
cela n'interdit pas pour autant de créer 
aussi des tables à intervalles fixes. Pro- 
céder comme suit : 

Déterminer préalablement la taille de 
grille nécessaire au dessin de la plus 
grande image. En hauteur : la dimension 
grille est égale au nombre de lignes requi- 
ses par le motif. La longueur de grille cor- 
respond au nombre de cases mémoire * 
par le nombre de pixels contenus par une 
case. (2-4-8 selon mode écran). Une 



Table à intervalles variables 

Dans ce cas les zones de stockage de 
chaque sprite sont de longueur diffé- 
rente. Il devient impossible de retrouver 
une zone par incrémentation régulière, 
d'où la nécessité de connaître à l'avance 
l'adresse qui exigera 2 octets par dessin. 
Ces deux octets ADSPT contiennent la 
valeur de l'adresse où commence les 
données du dessin SPT N. Cette table 
d'adresse est systématiquement générée 
par SURGENE. 




STRUCTURE 

ET EXPLOITATION 

D'UNE TABLE 

A INTERVALLES 

VARIABLES 




Table des sprites 



SPT1 SPT2 
i 



ADSPT1 t 



IADSPT2 



SPT3 



ADSPT3 I 



SPT4 



1 ADSPT4 



Etc. 
t 

tADSPTS 



Table d'adresses 



ADSPT1 ADSPT2 ADSPT3 ADSPT4 ADSPT5 Etc. 
i i i . i ...i 



ADTABI.E 1 



2 oct. 



2 oct. 



2 oct. 



2 oct. 



2 oct. 



2 oct. 



Détail d'un sprite 



Ici, les dimensions H & L, différentes 
pour chaque sprite, doivent être recher- 
chées dans la table. 



; ; !___ ___!_. 

01 02 03 

ADSPT î 3 oct. données diverses 



H 

Hauteur 



L 
_argeur 



Dl 



D2 Etc 



Recherche d'un sprite d'après 
une table d'adresses 



Début de la table d'adresse dans IX 



Ad re 



LP A, NUMERO DU SPRITE 

LD IX.ADTABLE 

DEC A 

JR Z, TROUVE 

INC IX 

INC IX 

JR BOUCLE 

Ici IX Pointe sur l'adresse qui contient l'adresse du dessin 

LD L. CIX+O) Ne pas oubl 1er que le ZSO range 1 "octet faibli 

LD H, (IX+I1 en premier 

Ici HL Pointe sur le premier octet du sprite 01 

INC HL 02 

INC HL 03 

INC HL Pointe sur l'octet contenant la hauteur 

LD C, IHL! Hauteur dans C 

INC HL Pointe sur l'octet contenant la longueur 

LD B.(HL) Longueur dans B 

LD < DIMENS IONS I , BC Les 2 sont rangées en mémoire 



sur le premier pixel 



L'affichage peut commencer. 



N'OUBLIEZ PAS QUE LA TABLE 
D'ADRESSE CONTIENT DES POIN- 
TEURS, C'EST A DIRE L'ADRESSE DE 
LA DONNEE A UTILISER ET QUE 2 OPE- 
RATIONS SUCCESSIVES SONT NECES- 
SAIRES POUR EXTRAIRE CETTE 
DONNEE. 
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DETAIL 

DE LA STRUCTURE 

D'UNE TABLE DE 

TRAVAIL SURGENE 



Table d'adresse 



Adresse : 



Contenu 



21856 

21857 
21858 



: Mode écran requis par les 

sprites. 
: Nombre de dessins. 
59 : Pointeur de la table des 
encres. 
21 860 - 61 : Pointeur du premier sprite 
21862 - 63 : du second 
21864 - 65 : et tant qu'il y aura des 
sprites... (air connu). 

Table sprites 

Emplacement du premier sprite = 
21856 + 4 octets + (Nombre de spri- 
tes * 2), ou plus simplement : contenu 
de 21860 : LD HL, (21860). 
Les deux premiers octets à cet emplace- 
ment sont à la disposition de l'utilisateur. 
Le suivant permet de déterminer si le 
sprite a été conçu en miroir. si non. 1 
si HM, 2 si MV, 3 si MD. Si vous n'utili- 
sez pas de miroir, cet octet est libre. Les 
octets 4 & 5 contiennent la hauteur et 
la longueur du sprite. 
Emplacement second sprite = 21856 + 
4 + (nombre de sprites * 2) + la lon- 
gueur du premier sprite. (égale à hauteur 
sprite * longueur sprite) + 5 octets. Ou 
bien contenu de 21 862. Et ainsi de suite. 
Table des encres : elle est située à la 
suite du dernier sprite de la table et uti- 
lise : 1 octet par stylo de 1 à 1 5, 3 ou 
1 (selon le mode). Elle est terminée par 
un octet # FF pour en marquer la fin. Ces 
octets contiennent le numéro d'encre 
affecté au stylo pointé. Ils sont initia li- 
ses lors de l'option purge. 
L'étude de cette structure révèle que, si 
vous avez décidé de créer une table à 
intervalles fixes, de nombreux octets 
deviennent inutiles. Notamment la table 
d'adresse et les données concernant 



hauteur et longueur. Soit 4 octets par 
sprite ou bien 7 ; si vous n'utilisez pas 
les octets de données. Une bonne con- 
naissance des LDIR et LDDR vous per- 
mettra de créer un programme optimi- 
sant ce type de table. Sinon, l'option 
"merge" de SURGENE vous offre un 
palliatif. 

1 - Pour concaténer 2 tables, le pro- 
gramme découpe en 4 fichiers différents, 
la table présente en mémoire et les sau- 
vegarde sur le disque sous les noms : 
a - TN.BIN : les noms des sprites : A 
l'adresse 19256 

b - TI.BIN : la table des encres : A 
l'adresse 20256 

c - TA.BIN : la table des adresses : A 
l'adresse 21856 

d - TS.BIN : la table des sprites : A 
l'adresse 21856 + 4 + (nombre de spri- 



tes * 2). C'est cette dernière qui nous 
intéresse car elle contient les seules don- 
nées des sprites. Vous pouvez donc éli- 
miner la table des adresses par ce 
moyen. Ce sera toujours ça de gagné. 
Vous n'êtes, dans ce cas, pas tenu de 
pousser le "MERGE" Jusqu'à la fin. 
"Répondez N" quand le programme, 
demande s'il doit changer une table. 
Vous retournerez au menu juste après la 
création des 4 fichiers. 



STRUCTURE DE 
LA TABLE CHANTIER 

L'adresse 21 856 contient toujours #FF. 
Le premier octet de donnée du sprite 
(contenu de l'adresse indiquée par le 



pointeur de sprite), renferme le mode 
dans lequel a été conçu le sprite. La table 
des encres n'est pas créée, le premier 
pointeur (21858-59) indique au pro- 
gramme l'adresse où devra commencer 
le sprite suivant. 

En 19256 figure un buffer de 100*10 
octets. Ce dernier contient les noms 
affectés aux sprites. 

19256 NOM1 

19266 NOM2 
L'octet de remplissage est # 20 
En 20256 c'est un buffer de 16 * 100 
octets, destiné à contenir les numéros 
d'encres attribués à chaque sprite. Le 
stylo n'est jamais pris en compte. Un 
code # FF termine chaque série. La série 
100 en 21841 (jamais utilisée) contient 
le nom de la table. L'octet de remplissage 
est #E5. 



ÛfttfLj yi 



'de la mémoire écran 

'Les heureux possesseurs d'une 
imprimante pourront rajouter :#8, 
derrière tous les F'RINT et devront 
'disposer de 5 feuilles 1/2 de papier 

Initialisation du compte lignes %. 
du début de la mémoire écran 



lô ******************** 

20 '**♦* SCREEN MAP **** 

30 '»»»**»****#»**♦#*#** 

40 ' 

50 'Ce programme établit la carte 

60 

70 

80 

90 

100 

110 

120 

130 

140 ' 

150 MODE 2:COMPT=0:AD=M>)00:1=1 

160 ' 

170 "Boucle d'affichage des groupes de 

180 '8 lignes décales de &800 

190 

20Ô FOR AD1=AD TO &FFCF STEP &8Ô0 

210 PRINT USING"LIGNE CARACTERE NUM. ## ";1;:PRINT "ADRESSE D 

EBUT LIGNE ECRAN : "; HEX$(AD1) 

220 C0MPT=C0MPT+1 

230 IF C0MPT=8 THEN COMPT=0:GOTO 300 

240 NEXT 

250 ' 

260 'Boucle d'affichage des colonnes 

270 '(identiques pour chaque groupe de 

280 '8 lignes) 

290 ' 

300 PRINT: PRINT"OCTET FAIBLE DES 79 ADRESSES ECRAN CORRESPON 

DANT AUX COLONNES": PRINT 

310 FOR I=AD1+1 TO AD1+79 



320 PRINT RI6HT$(HEX$(I),2>;" "; 

330 NEXT 

340 ' 

350 'si 25 lignes sorties : termine 

360 ' 

370 1=1+1: IF 1=26 THEN END 

380 ' 

390 '1ère adresse du groupe de 8 lignes 

4O0 +80 (?*50) = 1ère adresse du groupe 

410 suivant 

420 ' 

430 PRINT: PRINT: AD=AD+80: GOTO 200 



tfçfc Vj £ . 



i '***♦♦**♦♦**♦***♦*** 

2 '*♦♦* PIXEL MAP ***♦ 

3 '♦»♦»***♦♦♦*»:»****** 
10 MODE 2 

20 FOR 1=4 TO 15:INK i,i:NEXT:INK 10,18 
30 INK 0,10: BORDER 10: INK 1,0: INK 2, 10,3: INK 3,26 
40 PRINT"SORTIE SUR IMPRIMANTE ? (0/N) " 
50 A$="":WHILE A$="":A$=UPPER$(INKEY$»:WEND 
60 IF A$="0"THEN K=1:G0T0 190 
70 IF A$="N"THEN 190 
80 GOTO 50 

90 MODE 2:PRINT:PRINT"[A1 = ARRET , [M] = AUTRE MODE , CI] I 
MPRIMANTE ON-OFF" 

100 IF k<>0 THEN LOCATE 1,4:PRINT"X SORTIE SUR IMPRIMANTE ET 
ECRAN X" 

110 IF k=0 THEN LOCATE 1,4:PRINT"X SORTIE EXCLUSIVEMENT SUR 
ECRAN X" 

"120 A$="":WHILE A$="":A*=UPPER$(INKEY$):WEND 
130 IF A$="A"THEN MODE 2: END 
140 IF A*="M"THEN 190 
150 IF a$(>"I"THEN 120 
160 IF k<>e THEN k=0 ELSE IF k=0 THEN k=l 
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170 GOTO 100 

190 «ODE 2:PRINT"EN MODE 2 CHAQUE PIXEL CORRESPOND A UN POIN 

T ALLUME" :PRINT 

2O0 PRINT"MODE 1 : LES PAIRES DE BITS 3-7 2-6 1-5 0-4 DONNEN 

T LES 4 PIXELS" 

210 PRINT"DE 6AUCHE A DROITE . LES VALEURS A ENTRER DANS CHA 

QUE PAIRE SONT" 

220 PRINT"00 -01-10 -HPOURPEN = 0-l-2-3 .":PRI 

NT:PRINT 

230 PRINT"EN MODE LE PIXEL 6AUCHE EST COMPOSE AVEC LES BIT 

S D'ORDRE IMPAIR" 

240 PRINT'DANS L'ORDRE : [1-5-3-7]" 

250 PRINT"LE PIXEL DROIT EST COMPOSE AVEC LES BITS D'ORDRE P 

AIR DANS L'ORDRE : [0-4-2-63" 

260 PRINTDANS CE MODE LES VALEURS SONT A DONNER EN DECIMAL 

ET CORRESPONDENT AUX" 

270 PRINT'VALEURS USUELLES DE PEN (0 A 15) POUR LES PIXELS G 

AUCHE ET DROIT" 

280 PRINT"LE RESULTAT EN BINAIRE EST CALCULE PAR LE PROGRAMM 

E .":PRINT 

290 PRINT"POUR QUITTER CETTE OPTION , ENTRER UNE VALEUR DE - 

1 ." 

300 PRINT:PRINT:PRINT:INPUT"QUEL MODE ";«:IF m<0 OR m>3 THEN 

300 

310 ' 

320 '*** COORDONNEES DES CADRES SELON LE MODE ECRAN (1-2 IDE 

M) ♦** 

330 ' 

340 INK 2,15: IF m<>0 THEN MODE l:r=0:xl=94:y=3:yl=350:Y2=0:L 

OCATE 1,1:PRINT"BITS 76543210 MODE"; m: GOTO 420 

350 MODE 0:r=0:xl=28:y=2:yl=366:Y2=0:Flag=0:GOTO 420 

360 ' 

370 resl=INT(var/ (2/ (m+ABS(n=0) 12) > ) : Y1=INT (Y/2) : y=2*y 1 î RETU 

RN 

380 '**♦ DESSINE LES CADRES *♦* 

390 ' 

400 ' IF m<>0 AND y>23 THEN y=3:yl=350:Y2=0 

410 'IF «i=0 AND y>20 THEN y=2:yl=368:Y2=0 

420 x3=(8*16)*(ABS(n=0)+l) '+2+(2»ABS(«F0)) 

430 MOVE X1,Y1:DRAWR x3,0,3:MOVE X1,Y1+18:DRAWR x3,0,3 

440 MOVE X1,Y1:DRAWR 0,18:MOVE Xl,Yl:FOR i=l TO 7 

450 MOVER 16+(16*ABS(M=0)),0:DRAWR 0,18:MOVER 0,-18 

460 NEXT:MOVER 16+(16*ABS(M=0)),0:DRAWR 0,18: IF r<)0-THEN r= 

0:RETURN 

470 ' 

480 '*♦* ENTREE ET CONTROLE DES DONNEES EN DECIMAL BINAIRE 

U HEXA »*« 

490 '**♦ POUR MODES 2 & 1 **♦ 

500 ' 

510 IF (»=0 THEN 900 

520 LOCATE 1,25:PRINT CHR$(&14);:LOCATE 30,25:PRINT STRING*( 

8,233) ;CHR$ (234): LOCATE 2,25:INPUT"N0MBRE CODEtdec.bin. [H]ex 

)";a$:IF A$="-l" THEN 90 

530 IF LEN(a*)>3 THEN IF LEN(a$)<>8 THEN 520 ELSE nbc=VAL("& 

X"+a$):GOTO 600 

540 IF LEFT*(a$,l)="H"OR LEFT$(a*,l)="h"THEN IF LEN(a*)>3 TH 

EN 520 ELSE nbc=VAL("fc"+a$):GOTO 590 



550 nbc=VAL(a*):IF nbc<0 OR nbc>255 THEN 520 

560 ' 

570 '#*♦ AFFICHA6E »** 

580 ' 

590 a*=BIN$(nbc,8> 

600 LOGATE 7,Y:PRINT a$;:PRINT USING" ### ";nbc;:PRINT"8<";HE 

X$(nbc,2):xl=94:r=l:GOSUB 430 

610 IF M=l THEN 730 

620 ' 

630 '*** TRAITE LE MODE 2 **» 

640 ' 

650 LOCATE 27,1:PRINT"1234567B PIXEL" 

660 r$="":FOR i=l TO 8 

670 IF MID*(a$,i,l)="l"THEN r$=r$+CHR$( 233) ELSE r$=r$+CHR*(3 

2):c(i-l)=0 

680 NEXT 

690 LOCATE 27,Y:PRINT r$:GOTO 1210 

700 ' 

710 '#*# TRAITE LE MODE 1 *** 

720 ' 

730 LOCATE 27,1:PRINT" 12 3 4 PIXEL" 

740 LOCATE 1,3:PRINT"PEN ";CHR*(241):F0R i=0 TO 3:L0CATE 1,3 

+(i+l) 

750 IF i=0 THEN PRINT" = 0"ELSE PEN i:PRINT CHR$(233);:PEN 

1:PRINT USING" = #";i 

760 NEXT 

770 B$=RIGHT$(A»,4):C»=LEFT$(A$,4) 

780 FOR 1=1 TO 4 

790 C=VAL( ,I Î ! X"+MID$<B$,I,1)+MID*(C$,I,1)> 

800 PEN C:C(I)=C 

810 LOCATE 25+2*i,y:PRINT CHR$(233);CHR$(233) 

820 POKE 55527+ (160*Y2),nbc 

830 NEXT: PEN 1 

840 MOVE 562,Y1:DRAWR 18, 0,3: DRAW 0,18:DRAWR -18,0:DRAWR 0, 

-18 

850 GOTO 1210 

860 ' 

870 '♦*♦ TRAITEMENT DU MODE *** 

880 '*** AFFICHE LES 15 COULEURS DISPONIBLES *** 

890 ' 

900 IF fla9=l THEN 970 ELSE INK 2,3:HP=1:VP=19:F0R 1=0 TO 15 

910 IF I/4=INT( 1/4) THEN VP=VP+1:HP=1 

920 LOCATE HP,VP:PEN I:PRINT CHR$(233);:PEN l.-PRINT USING"=# 

# ";I:HP=HP+5 

930 NEXT:flag=l'*** NE PAS REAFFICHER A CHAQUE TOUR LES COUL 

EURS DE PEN 

940 ' 

950 '*♦* ENTREE ET CONTROLE DES DONNEES *** 

960 ' 

970 LOCATE 1,24:PRINT CHR$(&14);:INPUT"PIXEL GAUCHE";P6:IF P 
G=-l THEN 90 

971 INPUT"PIXEL DROITE";PD 

980 IF PG<0 OR PG>15 OR PD<0 OR PD>15 THEN 900 
990 ' 

1000 '*** PERMUTATION DES BITS EXTREMES *** 
1010 ' 
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1020 C(1)=P6;C(2)=PD:P6$=BIN$(P6,4):PM=BIN«(PD,4):P61$=STRI 
N6$(4,32):PD1»=P61* 

1630 MIW(P61$, 1. 1)=RI6HT*(PG», 1) :«ID$(PG1>,4, l)=LEn$(P6», 1 
):MIM(P61*,2,:<=f1IM(P6$,2,2) 

1040 HID$(PDl$,l,l)=RI6HT$(PDi,l):HID$(PDl*,4,l)=LEFT*(PD$,l 
):MIW(PD1$,2,2)=MID$<PD*,2,2> 
1050 ' 

1060 '*** MISE EN ORDRE DE L'OCTET (1 BIT GAUCHE + 1 BIT DRO 
IT 4 FOIS DE SUITE) 
1070 ' 

1080 A*="":FOR 1=1 TO 4 

1090 A$=A»+MID*(PG1$,I,1):A$=A$+MID$(PD1»,I,1) 
1100 NEXT 
1110 ' 

1120 '*** AFFICHA6E **♦ 
1130 ' 

1140 LOCATE 2,Y:PRINT A$:R=1:60SUB 430 
1150 LOCATE 11,Y:PEN PG:PRINT STRING$( 4, 233): LOCATE 15,Y:PEN 
PD:PRINT STRING$(4,233) 

1160 nbc=VALCH"+a$):POKE 57501+(160»Y2),nbc:PEN 1 
1170 MOVE 608,Y1:DRAMR 20,0:DRAWR 0,16:DRAWR -20,0:DRAWR 0,- 
16 

1180 ' 

1190 '»♦* SORTIE DES CODES ENCRE POUR LES 3 MODES »** 
1200 ' 



1210 r=l:IF i<>0 THEN xl=416 ELSE xl=320 

1220 GOSUB 430 

1230 ' 

1240 **** IMPRIMANTE »*** 

1250 ' 

1260 IF k=0 THEN 1400 

1270 b*="BITS : 76543210 PIXELS : 12345678 MODE : 

"+STR$(«> 

1280 a$="ETAT : "+a$+" PEN : " 

1290 ON b+1 6OT0 1340,1310,1300 

1300 PRINTI8, b*:PRINT#8, ai; MID$(a$, 10,8);: GOTO 1360 

1310 MID$(b$,33,8)=" 1 2 3 4":PRINT#8,b$:PRINTI8,a$; 

1320 FOR i=l TO 4:PRINTi8,USING"##";c<i);:NEXT 

1330 60TO 1360 

1340 MID*(b*,33,8)=" 1 2":PRINT#8,b$:PRINT#8,a$; 

1350 FOR i=l TO 2:PrçiNT#8,USING"#*##";c(i);:NEXT 

1360 PRINTI8,USING" CODE ###";nbc;:PRINT#8," & u ;HEX*(nbc 

,2):PRINTt8, 

1370 ' 

1380 '*** 

1390 ' 

1400 IF «<>0 THEN Xl=94:Yl=Yl-32:Y=y+2:y2=y2+l:IF y>23 THEN 

y=3:yl=350:Y2=0:GOTO 420 ELSE 420 

1410 Xl=28:Yl=Yl-32:Y=y+2:y2=y2+l:IF y>18 THEN y=2:yl=368:Y2 

=0:GOTQ 420 ELSE 420 



PROTEGER VOTRE AMSTRAD 

TOUS LES SACS ET HOUSSES SONT ADAPTÉS A CHAQUE TYPE DE MATÉRIEL ET LES PASSAGES DE CABLES SONT PRÉVUS. 






□ Sac pour Amstrad (clavier) 
CPC464a664Q61'28nPCW 8256 D 
Coloris: bleu, gris ou sable. 
Prix : 290 F TTC 

D Sac pour moniteur Amstrad mono- 
chrome Q couleur. D 
Coloris: bleu, gris ou sable. 
Prix: 400 F TTC 



D Housse pour Amstrad (claier) 

CPC 464D664D 61 280 PCW 8256.U 

Coloris: beige, blanc, bordeaux, noir, 

marron. 

Prix: 130 F TTC 

G Housse pour moniteur Amstrad. .-*^, û ,?,.° 

Coloris: beige, blanc, bordeaux, noir, 

marron. 

Prix: 130 F TTC 



a 



Pochettes disquettes 3" ou 3,5" 

D pour 1 disquette 29 FTTC 

□ pour 6 disquettes 116F TTC 

□ pour 10 disquettes , . 150 FTTC 
D pour 32 disquettes . . 200 F TTC 
Coloris: gris, bleu ou sable. 



Les sacs pour claviers AMSTRAD 464 - 664 - 61 28 comprennent 1 poche pour le clavier plus 1 autre du même volume pour y ranger les accessoires 

POUR COMMANDER: Retournez-nous cette publicité en cochant le ou les pro- 
duits que vous désirez recevoir et en remplissant le bon ci-dessous. Pour les coloris, 
rayez les mentions inutiles. 

• Port PTT à ajouter au montant de votre commande: 25F 

• Joindre votre règlement par chèque ou mandat à votre commande. 

Nom Prénom 

Adresse 

: Tel 

Signature: 




DIFFUSION 



17, rue Russeil - 44000 NANTES 
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asy'^SyS 



TASWORD 



Saga... 

Voici 3 ans la presse informati- 
que saluait TASWORD 464 en 
'-3K ces termes : « Il n' y a pas de 
42A.- #^ ~â meilleure raison d'acheter un 
* CPC que ce programme ! » 
TASWORD 464 (FF 260.- ttc) fut 
suivi de TASWORD « D » AAAIL-AAERGE pour,ac- 
commoder les disquettes et le 664. En 1985, 
TASWORD 6128 MAIL-MERGE (TASWORD « D » et 
TASWORD 6128 sont vendus sur la même 
disquette à FF 360.- ttc) avec sa massive mé- 
moire texte de 64 Ko vit le jour et devait bien- 
tôt être accepté comme le standard sur le 6128 
et les 464/664 avec extensions DK'tronics. 



1986 vit l'arrivée de 



TASWORD 8000 PCW 



vitesse et « mailmerge » en plus ! 

Le traitement de textes qui rend sa rapidité et 
sa mémoire aux PCW 8256/8512 leur offrant par 
la même occasion le premier AAAIL-AAERGE 
incorporé et l'accès aux imprimantes externes. 
Tasword 8000 peut utiliser les fichiers Locoscript, 
Dbase, Wordstar, AAultiplan etc.. (FF 450.- ttc). 



plus sur ce dernier un créateur de polices sim- 
ple" et puissant. TASPRINT s'utilise aussi seul 
pour imprimer tout texte ASCII (Locoscript, Word- 
star etc..) Sur PCW et PC, TASPRINT possède un 
mode « machine à écrire » très pratique pour 
les textes courts. ( TASPRINT CPC et PCW FF 
250.- ttc - PC FF 390.- ttc). 



le dernier né des laboratoires 

Sémaphore-Tasman ! 

Des talents d'artiste en lettres... 

~ t Créez vous-même enseignes, ré- 
clames, affiches... TAS-Sign fait 
passer le message clairement et lisi- 
blement ! Quatre écritures caractéris - 
tiques pour toutes les occasions, de 
4 à 19 centimètres de haut, itali- 
que, soulignement, espacement pro- 
portionnel, cadrage et centrage auto- 
matiques, huit options de tramage. 
TAS-Sign imprime dans la hauteur ou 
la largeur du papier et sur la longueur 
désirée (papier continu) (TAS-Sign 
' CPC et PCW, FF 250.- ttc - PC, FF 
390.- ttc). 



TASWORD PC 



Un vent de renouveau... 

Le printemps 1987 vit la naissance de TASWORD 
PC, un vent de simplicité et de puissance (sans 
parler d'économie... FF 490.- ttc) souffle sur les 
« compatibles ». Face aux mastodontes du trai- 
tement de texte, TASWORD propose à un prix 
calculé, une solution qui en fait plus ; TAS- 
WORD PC fait avec efficacité ce que la majorité 
des utilisateurs souhaitent, il simplifie l'écriture. 
Un manuel complet et didactique, un pro- 
gramme d'auto-apprentissage et bien sûr AAAIL- 
AAERGE accompagnent TASWORD. Sémaphore 
assure le transfert des fichiers Tasword CPC et 
PCW sur disquette 5'l/4 (±FF 9.- la page A4). 

Des talents de typographe... 



TASPRINT 



accompagne TASWORD depuis 
le début et vous permet de 
faire des merveilles avec votre 
imprimante matricielle, cinq po- 
lices de caractères sur CPC, huit 
sur PCW et plus de vingt sur PC, 



AAASTERFILE 8000 



La base de données (fichier) relationnelle 
écrite en langage machine pour le PCW... 
(pas encore un autre programme BASIC ou 
CP/AA réchauffé à la sauce PCW !). 
Lq où les autres vous obligent à faire un choix 
entre fichiers en RAAA rapides mais de capacité 
limitée, et des fichiers en accès direct sur dis- 
quettes, de grande capacité mais encombrants 
car de longueur fixe, AAASTERFILE et le disque 
RAAA du PCW travaillent ensemble pour vous 
proposer une grande capacité et un accès 
rapide à des données de longueur variables. 
100% en langage machine, entièrement piloté 
par menus, AAASTERFILE 8000 est aussi accompa- 
gné d'un manuel didactique complet et de 10 
exemples directement utilisables (adresses/éti- 
quettes, facturier, bibliothèque, discothèque, 
gestion clientèle, gestion articles etc.). Un 
fichier AAASTERFILE se crée rapidement sans con- 
naissances de programmation, directement à 
l'écran comme dans un programme de dessin. 
Vous gardez intactes les possibilités de votre 
imprimante. AAasterfile peut importer et exporter 
tout fichier ASCII. (FF 550.- ttc). 



âffc- 



SEAAABANK 



tenue de comptes bancaires 
pour tous CPC ( disquette ) 

Ergonomie et rapidité sont les ca- 
ractéristiques de ce programme 
écrit 100% en assembleur. Calqué 
sur un relevé bancaire classique, SE- 
AAABANK évite toute gymnastique 
mentale inutile ! (FF 330.- ttc). 



SEAAASTATS 



le premier programme de statistiques 
sur CPC ! 

Suivi, lecture, sauvegarde et correction des 
données, impression des résultats. Statistique 
descriptive, 10 tests paramétriques - régression 
linéaire, comparaison de moyennes, analyse de 
profils, analyse de variances à 1 et 2 critères, 
analyse discriminante, etc.. - Tableaux et gra- 
phismes. Manuel détaillé avec notions théori- 
ques. Un outil professionnel d'étude stastique 
pour les recherches de moyenne envergure ou 
le test de recherches plus larges. (SEAAASTATS 
disquette FF 395.- ttc) 



ALIMENT 



Dis-mois ce que tu manges et je te dirai 
qui tu es... (CPC 6128 et PC) 

S'il est agréable pour l'estomac de manger un 
bœuf Wellington, il peut être intéressant pour 
l'esprit de savoir ce qu'il y a dans le bœuf Wel- 
lington. Basé sur une table de plus de 800 (1000 
sur PC) aliments subdivisés en 16 nutriments, 
ALIAAENT vous permet une analyse détaillée de 
la composition de votre nourriture par repas et 
par jour. Un programme conçu pour une utilisa- 
tion professionnelle en diététique mais d'un 
intérêt certain pour celui qui s'intéresse de près 
à son alimentation. Ecrit par un médecin avec 
l'assistance du service de Diététique et de Dia- 
bétologie de l'Hôpital Universitaire de Genève. 
(ALIAAENT CPC FF 1 500.- ttc PC FF 3 800. -ttc dis- 
ponible en VPC seulement). 



GRAFPAD III PCW et PC 



(disponible en VPC seulement) 
La tablette à digitaliser de niveau 
professionnel dotée d'un program- 
me dessin assisté de hautes perfor- 
mances : POWERCAD ( Sur PCW, 
manuel en français FF 1 850.- ttc - 
sur PC manuel et logiciel en fran- 
çais FF 2 495.- ttc). 



SEMFICH 



gestion des catalogues de 
disquettes 3" sur CPC 

N'avez-vous jamais, vous qui avez plusieurs 
dizaines ou plusieurs centaines de programmes 
sur disquettes, rêvé de pouvoir : classer vos 
programmes par « genres » ou « types », com- 
menter brièvement chacun d'entre-eux et, évi- 
demment, retrouver immédiatement celui que 
vous recherchez ? SEAAFICH vous le permet ! 45 
codes de classement, 98 faces de disquettes, 
commentaires de 48 signes, listes écran et 
imprimante, recherche, mise à jour automati- 
que, pour 6128, 664, 464 + drive, toutes impri- 
mantes, lecteur B. (SEAAFICH FF 330.- ttc). 



Et toujours, pour CPC : 



AAASTERFILE III la base de données relation- 
nelle (FF 360.- ttc) et MASTERCALC 1 28 

(FF 300.- ttc) le tableur simple, puissant et 
rapide pour le 6128 et les 464/664 équipés de 
l'EXTENSION 64 K DK'tronics (FF 465.- ttc). 
TASCOPY, le programme de copie d'écrans 



tons de gris aux formats A4 & A3 
(FF 230.- ttc). 

Le CRAYON à fibre optique (FF 350.- ttc 
464/664 - FF 445.- ttc 6128) & le DIGITALISEUR 
(Scanner) DART pour DAAP2000/3000 
(FF 750.- ttc). (Bientôt en véVsions PCW et PC...). 
Pour ceux qui ont le nouveau connecteur BUS 

6128, le câble RACCORD/CONVERSION 

qui vous permettra de raccorder toutes les 
extensions (synthé, scanner, multiface etc..) 
utilisant l'ancien connecteur (FF 175. -ttc). 



COMMANDES 



Les produits Sémaphore sont disponibles auprès des meilleurs revendeurs spécialisés ou directement : 
Pour la France, Sémaphore p. a. DMS-Diffusion av. du Salève 01220 Divonne-les-Bains tél. 50 20 79 85 

Pour la Suisse, la Belgique, autres pays, et payements par Cartes Visa, Eurocard, Diner's, American 
Express : commandes téléphoniques au 54 11 95 (Genève) du mardi au vendredi. 

Sémaphore distribue les ordinateurs Amstrad / Schneider en Suisse. Nos logiciels sont dis- 
ponibles dans notre magasin : Sémaphore, 94 route de La Plaine CH - 1283 La Plaine (Genève). 
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• FESTIVAL DE LA MICRO. N'oubliez 
pas ! Du 9 au 11 octobre 1987 à l'Espace 
Austerlitz (30 quai d'Austerlitz 75013 Paris) 
se déroulera le Festival de la Micro, orga- 
nisé par Néo-Média. Toutes les marques 
seront représentées. Donc, si vous êtes un 
vrai fanatique de la micro, rendez-vous sur 
le stand CPC. 




• GRANDE EXPOSITION DE 
LA MICRO-INFORMATIQUE. 

Du 14 au 19 septembre s'est dérou- 
lée au CNIT de la Défense à Paris, 
la grande exposition de la Micro- 
Informatique. Plus de 150 expo- 
sants, constructeurs et distributeurs se 
sont réunis pour présenter aux utili- 
sateurs de la micro-professionnelle, 
les dernières nouveautés, tant au 
niveau des matériels que de leurs 
applications. 

Bien entendu, Amstrad était présent 
à cette grande manifestation. A cette 
occasion, nous avons pu voir l'arri- j 
vée en France du "petit dernier" : 
le PC 1 640 ECD qui se situe en haut 
de la gamme des "compatibles". 
Haut en couleurs, puisqu'il est capa- 
ble de gérer 64 couleurs tout en affi- 
chant 16 couleurs simultanément, le 
PC 1640 a l'originalité de proposer 
à l'utilisateur tous les modes graphi- 

Sues existant déjà, 
ans un premier temps, seule la ver- 
sion avec disque dur 20 M va être 
disponible en France. 
PC 1640 HD 20 : 13390 F hors 
taxes. 




• GONFLEZ VOTRE PCI 512. NEC est 

une société japonaise qui figure parmi les 
géants de l'industrie des semi-conducteurs. 
Son catalogue de microprocesseurs vient de 
s'enrichir de deux nouveaux produits, les V 
20 et V 30, qui peuvent remplacer, sans 
modification hard, les 8088-2 et 8086-2, 
tout en apportant un gain de vitesse consi- 
dérable, que l'on doit en particulier à une 
écriture optimisée du jeu de micro- 
instructions. Sachez, à titre indicatif, qu'un 
PC 1512 équipé du V 30 tourne à quatre 
fois la vitesse du PC standard. Distribué par 
Cholet Composants, tél. 41.62.36.70. 



• CONTRAT DE LICENCE MIXTE: BORLAND- 
EDUCATION NATIONALE. Selon Philippe Kahn, fon- 
dateur et président de Borland International "le marché 
de l'éducation constitue un débouché privilégié pour les 
éditeurs de logiciels et un moyen de toucher directement 
les décideurs de demain". Cette théorie se concrétise 
aujourd'hui par la signature d'un contrat de licence mixte 
entre le ministère de l'Education Nationale et la société 
Borland International. Depuis près d'un an, Thierry Bre- 
ton a participé à l'élaboration de ce tout nouveau con- 
cept ae la licence mixte qui consiste en, d'une part, l'ac- 
quisition par l'Education Nationale du droit a'usage et, 
d'autre part, l'achat par les lycées et collèges, des logi- 
ciels Borland. Dans le cas présent, les logiciels concernés 
sont Turbo Pascal, langage de programmation struc- 
turé, Turbo Graphix, boîte à outils pour les program- 
meurs en Turbo Pascal et Reflex gestionnaire de base 
de données. 

Ce nouveau partenariat entre l'Etat et Borland Interna- 
tional est valable pendant deux ans à partir de cette ren- 
trée scolaire et met ainsi provisoirement i/n ferme au pira- 
tage universitaire qui existait pour Turbo Pascal I 
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Un logiciel fran 
cais TURBO 
CAD3Dsepro 
pose de vous 
ouvrir le mon- 
de de la 3* di- 
mension. Au 
menu, on trou- 
ve : création 
et manipula- 
tion d'ob/efs en 
3 D dans uneli 
mite de 64000 
points sur les 3 
axes. 

De plus, une 
option anima- 
tion en temps 
réel (jusqu'à 8 
images par se- 
conde) est dis- 
ponible. Ce lo- 
giciel sera bien 
tôt complété 
par une série 
de modules con 
cernanf les fa- 
ces cachées, le 
nappage, la 
cotation 3D. 
Ce logiciel est 
commercialisé 
par la société 
HAND-SHA- 
KE (16 (1) 
48.58.47.41) 
au prix de 
990 F HT. Ce 
programme 
foncfionne sur 
compatible 
XT, AT avec 
sortie vidéo 
Hercules, 
CGA, EGA. 



• TOUS A VOS MINITELS... 

AXIS, agence Etat-Région, chargée 
de la promotion de VIDEOTEX, 
organise un concours d'idées et de 
projets de services Vidéotex pour la 
région Midi-Pyrénées. 
Dans le cadre du concours, deux 
catégories de concurrents ont été 
prévues : 

— les scolaires concourent pour des 
idées ou des projets. 

— les adultes (personnes physiques 
et associations) pour des projets 
uniquement. 

Ce concours sera lancé officiellement 
fin septemnre 1987 et les candidats 
auront jusqu'au 31 décembre 
1 987 pour remettre leurs dossiers. 
Par ailleurs, la remise des prix et la 
présentation des meilleurs projets 
s'effectueront première quinzainee 
de février 1988. 

Pour retirer un dossier de participa- 
tion, ainsi que le règlement du con- 
cours, vous pouvez appeler AXIS au 
6 1.25.26.77; par Minitel sur 3614 
+ code AXIS ou auprès des agen- 
ces commerciales des Télécommuni- 
cations à partir du 1" octobre 1987. 
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• AMSTRAD COMPU- 
TER SHOW. Les 23, 24 et 

25 octobre prochains, se 
déroulera la 8' édition de 
l'Amstrad Computer Show, 
exposition organisée par 
Database et qui connaît tou- 
jours autant de succès à cho- 
que édition. 

Cette fois, l'exposition se tien- 
dra au G-Mex Centre de 
Manchester, immense édifice, 

3ui permettra de disposer 
'un "Théâtre Amstrad" 
pour présenter en non-stop, 
les nouveaux produits... 
Ainsi, bien entendu, que tous 
les nouveaux matériels sur 
CPC, PCWouPC... 



• FORT COMME HERAKLIOS. 

te PCW possède maintenant une 
écriture de disque qui permet des 
formatages rapides, ainsi que la 
récupération de programmes 
endommagés. Disponible chez ESAT 
SOFTWARE (56.96.35.23) sur 
PCW 8256 et 8512 au prix de 
350 F TTC. 



• OAONEZ VOTRE ENTRE- 
PRISE. Vous êtes l'auteur d'un 
programme éducatif performant? 
Celui-ci utilise les services d'au- 
tres média (vidéo, minitel etc.) ? 
Si votre seul désir. est de parve- 
nir à faire éditer cette œuvre, le 
concours "Création d'Entreprise 
Informatique Intermédia" est fait 
pour vous. Cette épreuve est 
organisée par la CAMIF, la fon- 
dation FIL et la Ville de Niort. Ne 
premier (et unique) prix, pour le 
moins original, est une entreprise 
au capital de 250.000 F. Le 
) local, (a formation, le conseil juri- 
dique et la garantie d'emprunt 
sont également fournis au ga- 
gnant, avec pour but de déve- 
lopper et vendre le logiciel. 
Si vous êtes intéressé par ce con- 
cours, écrivez à: Concours Créa- 
tion d'Entreprise, Carrefour Mé- 
dia Jeunesse de Niort, Hôtel de 
Ville, 79022 Niort Cedex, ou 
téléphonez au 49.28.00.21 
pour obtenir un dossier d'inscrip- 
tion. (Clôture du concours : le 30 
octobre 1 987 et résultats le 1 3 
novembre 1987 à Niort). 



• FRENCH CONNECTEURS. 

Une désagréable surprise attend les 
acheteurs du CPC nouveau. Les con- 
necteurs situés à l'arrière de leur 
machine diffèrent des anciens modè- 
les. Alors, adieu RS 232, imprimante 
sur disque externe. 
Les Dieux de l'informatique veillent 
sur l'AMSTRAD. En effet, il vous est 
possible de trouver des adaptateurs 
de BUS au prix de 175 F. Où cela ? 
Dans le catalogue Bretagne Edit 
Presse, bien sûr I (voir à I intérieur 
de la revue) ou bien chez B.Y Infor- 
matique - (Tel -. 76.43.40.49 ou 
75.02.17.18), qui propose égale- 
ment un côble rond permettant le 
branchement d'une imprimante sur 
les nouveaux CPC. 
NB. Les adaptateurs proposés dans 
le catalogue sont des produits 
Sémaphore. 



• MICRO-APPLICATION 
La distribution des produits 
micro-application en Belgique 
et au Luxembourg est confiée 
à Easv Computing (021660 
63.90). Parmi les logiciels, on 
frouve: GEM CALCOMAT 
PLUS (version 2.0): un tableau 
graphique sous GEM et 
SUPERBASE PROFESSION- 
NEL, un système de gestion de 
base de données 

relationnelles. 



ce 
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GUIDE DU GRAPHISME 
AMSTRAD PC 1512 
Georges FAGOT-BARRAL 
SYBEX 



£es capacités graphiques et la ca- 
dence d'horloge de l'AMSTRAD 
PC 1512, en font une machine 
douée pour l'image. L'emploi de BASIC 
2 aux puissantes commandes graphi- 
ques offre une très grande facilité de pro- 
grammation. Ce livre traite de l'image au 

M travers de BASIC 2 (sous GEM, donc) 
qui, nous le déplorons, ne comprend pas 
de commandes de liaison avec le 
système de type POKE, PEEK, CALL. 
Dix-neuf chapitres font le tour de la ques- 
tion. La taille des fenêtres avec la répar- 
tition des pixels sur l'écran physique, le 
calcul et la modification de la taille d'une 
fenêtre, l'emplacement des fenêtres, leur 
déplacement, l'écran virtuel, le déplace- 
ment de cet écran sous une fenêtre, la 

^ modification des unités virtuelles et le 

^B facteur d'asymétrie, la modification de 
la dimension en pixels de l'espace virtuel, 
l 'écran virtuel en mode texte, ses modi- 
fications, les canaux associés aux fenê- 

^È très et la récupération des fenêtres de 
dialogue et d'édition, la modification de 
l'emplacement de l'origine graphique. 
Viennent ensuite les travaux pratiques 
avec l'affichage en mode texte et le posi- 
tionnement du curseur ainsi que les 6 
options liées à l'instruction PRINT, la 
fixation des caractéristiques d'affichage, 
les commandes d'effacement. L'affi- 

jfâ chage en mode graphique, l'affichage de 

V points avec PLOT et ses 4 options ainsi 
que le tracé de courbes à l'aide de cette 
commande, le tracé de lignes avec UNE 
et ses 6 options, le tracé de courbes. Le 

^Ê tracé d'un rectangle avec BOX et ses 6 
options, le tracé d'un polygone avec 
SHAPE et ses 5 options, le tracé d'un 
cercle avec CIRCLE et ses 7 options, 
homothétie, rotation et inversion. 
Les annexes sont des exemples d'emploi 

^> de courbes : parabole, hyperbole, sinu- 
soïde (reliées), cardioïde, trifolium, qua- 
drifolium, rosace, lemniscate. 
Un livre très agréable, doté de nombreu- 
ses figures explicatives, de contact aisé. 
Un ouvrage de base. 
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• ENDURANCE 
QAMES. Une nou- 
velle version d'Inter- 
national Karaté va 
sortir. Que les puristes 
se rassurent, il s'agit 
uniquement d'une 
modification de prix. 
(Il diminue, bien 
sûr I). 






• INCENTIVE SOFTWARE. Annonce un logi- 
ciel entièrement en 3D : FREESCAPE. Ce jeu, qui 
a pour cadre une lune d'un système planétaire 
étranger est constitué de plus de 20.000 billions (!) 
de lieux. Selon INCENTIVE, ce logiciel n'est ni 
un jeu d'arcade, ni un jeu d'aventure, ni un jeu de 
stratégie, mais les 3 à la fois". 



• HEWSON. Les locomotives à 
vapeur vous ont toujours fasciné ? 
(An, la bête humaine...). Voici de 
quoi vous réjouir. Devenez le con- 
ducteur de l'Evening Star {c'est éga- 
lement le titre du logiciel), une oes 
plus puissantes locomotives britanni- 
ques. Hewson se lance dans le mar- 
ché du logiciel à petit prix (mais de 
bonne qualité), le label RACK IT 
aura le soutien de MASTERTRONIC, 
en ce qui concerne la distribution. 



• LORICIELS. Tiré d'un dessin 
animé japonais, COBRA est 
maintenant le sujet d'un logiciel 
d'arcade des plus mouvementés, 
dans lequel vous retrouverez 
tous les personnages de la série. 
140 F K7 et 198 F disque. 
Compilation story : les Hits 4 réu- 
nis MGT, MARACAIBO et BILLY 
LA BANLIEUE, le tout pour 
160 F sur K7 et 198 F sur 
disque. 

MISSION, un jeu multi-salles 
(80) au cours duquel vous devez 
retrouver une formule ultra 
secrète. Disque 198 F, cassette 
160F. 
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• DIGITAL INTEGRA- 
TION . Goina for the gold ! 
C'est le cri qui sera lancé par 
les futurs adeptes de cette 
simulation sportive. A bord 
d'un bobsleigh, vous devez 
remporter la médaille olym- 
pique. Ce logiciel a été écrit 
en collaboration avec le meil- 
leur pilote de Grande- 
Bretagne. 



S* 





• GREMLIN GRAPHICS. Gary Lineker's 
superstar soccer (reprenez votre souffle!)... Il 
s'agit d'un jeu de football original, qui allie à 
la fois le jeu d'arcade et la stratégie. Disponi- 
ble en octobre. 

COMPENDIUM : le délire est assuré avec ce 
nouveau produit de Gremlin Graphics. Décou- 
vrez le monde des Winks et allez de surprises 
en surprises... 



• ERE INFORMATIQUE. 

Suite logique de ERE HITS, 
voici à nouveau une compila- 
tion de "classiques": CRAF- 
TON et XUNK, EDEN 
BLUES, ROBBBOT, SAI 
COMBAT, intitulée : ERE 
HITS 2. te prix ? 230 F en 
disquette et 150 F sur 
cassette. 

Sous le sigle "Métal Hur- 
lant", le logiciel CLASH évo- 
que l'ambiance moite d'un 
polar urbain (voir banc d'es- 
sai dans ce numéro). 120 F 
K7, 180 F disquette. Sont 
annoncés également dans 
cette série : CRAFTON & 
XUNK 2 et STRYFE 2 (en 
octobre). 




SEMAPHORE. SEMABANK est 
un utilitaire de gestion de compte 
bancaire, entièrement écrit en 
assembleur, (tous CPC : 330 F TTC). 
SEMASTATS : sous un nom qui ne 
laisse pas de doute quant à ses inten- 
tions, on trouvera un outil d'études 
statistiques pour les ordinateurs 



Vous avez décidé de maigrir de plu- 
sieurs kilos en suivant un régime dra- 
conien ? ALIMENT, disponible sur 
CPC et PC, tiendra à jour vos réser- 
ves caloriques et vous fera découvrir 
les composants cachés de vos plats 
favoris (CPC : 1500 F TTC, PC : 
3800 F TTC). 

GRAFPAD III PCWet PC : 3- version 
de cette tablette graphique destinée, 
cette fois, au PC et PCW. Cet outil 
est accompagné d'un logiciel de des- 
sin POWERCARD (1850 F TTC sur 
PCW et 2495 F TTC sur PC). 



• FIREBIRD. Profitant du 
succès des films tels que "A la 
poursuite du diamant vert" 
ou "Le diamant du Nil" voici 
MYSTERYOFTHENILE"un 
jeu d'aventurelarcade dans 
lequel les héros affronteront 
le vilain Abu-Sahl. Autre logi- 
ciel annoncé : BUBBLE BOB- 
BLE avec des petits personna- 
ges tout à fait charmants. 



• CRL. Book of the dead (Le 
livre des morts) est un /eu 
d'aventure qui a pour cadre 
l'Egypte antique et ses dieux. 
Mondroïd, la suite de 
Cyborg, vous met aux prises 
avec un méchant détenteur 
des plans d'un androïde 
guerrier. Votre mission : 
l'empêcher de produire ces 
derniers, en série. 



• INFOORAMES. Les PC et com- 
patibles ne sont pas en reste. La suite 
des aventures d'Isa est annoncée 
sous le titre LES PASSAGERS DU 
VENT 2. Des graphismes encore 
améliorés, de nouvelles options 
caractériseront cette aventure. Prix : 
290 F. 



• MARTECH. Slaime est un jeu d'aventure 
employant un mode d'action original : le 
personnage est continuellement confronté à 
de nouvelles situations, son environnement 
apparaît à l'écran et il ne vous reste qu'à 
prendre rapidement la meilleure solution 
pour espérer atteindre la fin du jeu. 



TOUS LES 2 MOIS 



CPC 





RATUIT 



POUR LES ABONNES 



PIERRE MEINSOHN 

Maître de la Fédération Internationale 
des Echecs 

et EUTERSOFT présentent: 

SUPERMflfl 

Le premier logiciel 

de perfectionnement aux échecs 

sur Amstrad 6128 



Nom 

Adresse 

Code Postal Ville 

Signature 

A retourner à EUTERSOFT 

chemin des mûriers 69540 IRIGNY 

en joignant un chèque de 199 F. 



ENFIN UN BUREAU POUR VOTRE ORDINATEUR A 480 F T.T.C.* 



• Structure rigide en bois de 22 kgs IMPRIMANTE 

• Large espace disponible 

• Espace de rangement pour cassettes, 

• Belle finition d'ensemble. Peinture anti-reflets, 
disquettes et papier. 

• Livré en kit. Grande facilité de montage. 

• Dimensions 
Hauteur : 80 cm 
Longueur : 77 cm 
Profondeur : 61 cm 



ECRAN 



Frais de port en sus. 



REVENDEURS, NOUS CONTACTER 




BON DE COMMANDE A RETOURNER A : 

Société Paul VEET. 1, Rue Nélaton. 92800 Puteaux. Tel : (1)49.00.04.56. 

Nom Prénom 

Adresse 



Je commande Bureau (x) pour ordinateur personnel au prix unitaire de 480,00 F T.T.C. 

Ci-joint mon règlement par chèque augmenté de 160.00 F de frais de port par article, soit au total de T.T.C. 



u 



L 



R 



ANTI 



ERREUR 



Grégory NOE 





Il est difficile de taper un programme d'une revue sans com- 
mettre d'erreurs I Quand les erreurs sont signalées (Syntax error 
in..., Une does not exist in...), la correction est facile puisque 
la ligne est indiquée, mais lorsqu'au "point de vue" du CPC, 
le programme est correct, il peut en être tout autrement pour 
le lecteur : 

Si le fonctionnement du programme ne correspond pas vraiment 
au programme original, alors il est impossible de retrouver l'er- 
reur commise, à moins de comparer les lignes de votre pro- 
gramme avec celles du journal mais c'est très long et on risque 
de passer sur une erreur sans la voir. 

C'est pourquoi ce programme a été créé ; il est à utiliser si vous 
ne retrouvez pas vos erreurs. 

La frappe d'un programme de votre journal favori (CPC) termi- 
née, vous faites "RUN" et là, vous corrigez toutes les erreurs 
signalées par le CPC en vous référant au journal pour compa- 
rer. Si, malgré cela, il ne tourne toujours pas, suivez cette 
procédure : 

— sauvez votre programme en ASCII grâce à l'instruction : Save 
"nom prog", A. 

Puis, si vous êtes sur K7, rebobinez la bande jusqu'au début 
du fichier ; 

— chargez Anti-Erreurs ; 

— entrez le nom de votre programme et insérez le support où 
il se trouve (K7 ou disquette). 

Après quelques secondes, les numéros de ligne vont défiler. 
Vous remarquerez qu'à chaque ligne correspond un code de 2 
lettres sous cette forme : >XX< ; c'est le code qui va vous 
permettre de savoir d'où proviennent les erreurs. Pour cela, il 
faut que vous compariez les codes du journal à ceux de l'écran. 
Si un code diffère, notez sur papier le numéro de ligne qui cor- 
respond à ce code. Continuez ainsi jusqu'à la fin du listage. 
Le défilement terminé, recherchez votre programme et corrigez 



les lignes que vous avez notées en comparant avec le journal. 
Faites "RUN" et ô miracle ! ça marche. 
Attention, lors de la frappe du programme à traiter, n'omettez 
aucun caractère (sauf les espaces) car Anti-Erreurs les prend 
en compte et bien sûr, ne tapez pas les codes de contrôle. 



ATTENTION : cette nouvelle version n'est pas com- 
patible avec l'ancienne. Seuls les programmes 
publiés dans ce numéro possèdent un code anti- 
erreurs correct. 

Les instructions de chargement restent, elles, 
inchangées. 



10 *#*#*#*#*###*#»#*#*#*#*#*###### 

7» ' I » 

3fc> ■ * ANTI - ERREURS * 

40 ' # | 

5« * VERSION 2.0 * 

60 ' # # 

70 *#*#*#*#*#*#*#*#♦#♦#*#*#*#*#*#* 

80 

90 ' (c) CPC & GREGORY NOE 1987 

100 ' 

110 

1 2ô yyy y y y y y y y y y y y y y y y y y y y ? y ? > > 

13Ô '< INITIALISATION > 

140 ' <«««<«««<«<«<««« 

150 ' 

160 ON ERROR GOTO 1260 

170 MODE 2 

180 DM G$(23) 

190 FOR 1=0 TO 22:READ G$:G$(I)=G$:NEXT 

200 'ATTENTION LA LIGNE DE DATA CI-DESSOUS NE CONTIENT 

TOUTES LES LETTRES DE L'ALPHABET !!! 

DATA A,B,C,D,E,F,G,H,J,K.L,r1,N,P,Q,R.T,U,v,IU,Y.Z 
ANTI-BUG FICHIER 

IF PEEK(HIMEr1+l>=255 THEN 280 

OPENOUT "CPC" 



PAS 
210 
220 
230 
240 



>LA 
>U 
>LC 
;LD 
>LE 
>LF 
>LG 
>LH 
>LJ 
>RB 
>RC 
>RD 
,>RE 
>RF 
>RG 
>0E 
>HH 
>GD 

;>fr 

>RC 

>AD 
>RE 

>ZD 
>MA 
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25» MEMORY HIMEM-2 >NX 

266 CLOSEOUT >RJ 

270 POKE HIMEM+1,255 >FP 

286 DEFREAL A-Z >DH 

290 ' >TB 

3O0 BORDER 6: INK 0.1: INK 1,16:PEN 1:PAPER >JN 

310 MOVE 0,16: DRAW 650,16 >TK 
320 PRINT TAB(27) "ANTI-ERREURS ";CHR$(24 >BU 
); "Version 2.0";CHR$(24) 

330 MOVE 0, 385: DRAW 650. 385 >UJ 
340 LOCATE 24, 25: PRINT "CPC REVUE DES STANDARDS AMSTRAD" >EV 

350 WINDOW 1.80,3,23 >NL 

36» M$="Realise par Gregory NOE" >HJ 

370 F$="" >XA 

380 FOR 1=1 TO LEN(M$) >PU 

390 F$=F$+MID*(M$,I,1) /PL 

400 LOCATE 70-1, 5: PRINT F* >UL 

410 FOR T=l TO 100 ,>LO 

420 NEXT T.I ->EF 

430 ' >RH 

440 *#♦************♦*♦*♦**♦******♦♦** >RJ 

450 ' ;>RK 

460 LOCATE 2,1:PRINT"ENTREZ LE NOM DU FICHIER : ": >XT 

470 INPUT "\NF* >FD 

48*3 IF NF$="" THEN PRINT CHR$(7):6ÛT0 460 >6R 

490 LOCATE 2, 3: PRINT" IMPRIMANTE OU ECRAN CI/E)?" >VR 

5W R$=" " : WHILE R$=" " : R$=UPPER$ ( INKEY*) : WEND >NK 
510 IF R$="I" THEN CA=8: PRINT "BRANCHEZ -LA..." ELSE 570 >XG 

520 PRINT#8,CHR$(27) ; " ! ";CHR$(20) >AR 

560 SOTO 590 >AB 

570 IF R$="E" THEN CA=0:6OTO 590 >YX 

580 GOTO 500 >ZE 
590 CLS:LOCATE 2,3:PRINT"TANT QUE LE LISTAGE N'EST PAS >QV 
TERMINE" 

600 LOCATE 2,5:PRINT"NE PAS ARRETER LE MAGNETOPHONE OU >JP 
NE" 

610 LOCATE 2,7:PRINT"PAS SORTIR LA DISQUETTE" /TE 
620 LOCATE 2, 10:PRINT"PRESSEZ UNE TOUCHE POUR LA LECTUR ,>HB 
E" 

630 CALL &BB05 /MA 

640 ' ;>ta 

650 ' <««<<«««««««« >TB 

660 '< TRAITEMENT DU FICHIER > ,>TC 

670 ' »»»)»»»»»»»» ;>TD 

680 /TE 

690 OPENIN " ! "+NF$ >MA 

700 CLS: PRETRAITEMENT EN COURS..." >JK 
710 IF LEN(A$)=255 THEN A$="":LINE INPUT#9.B$:G0T0 1170 >Y8 

720 LINE INPUT#9,B$:A$=B* >UY 

730 IF CA<>8 THEN GOSUB 1320 >VK 

740 IF INKEY (66) =0 THEN STOP >WR 

750 ' >TC 

760 CALCUL DE LA CLE DE CONTROLE >TD 

770 ' >TE 

780 A=0:FLG=0 >ME 

790 FOR 1=1 TO LEN(A$) >PL ' 



,800 L$=MID$(A$,I,1) ■ m 

810 IF L$=CHR$(34) AND FLG=1 THEN FLG=0:GOTO 870 >PZ 

820 IF L$=CHR$(34) AND FL6=0 THEN FLG=l:GOTO 870 >PA 

830 IF L$=CHR$(32) AND FLGOl THEN 880 >CD 

840 IF L$=CHR$(39) AND FL6=0 THEN 890 >CG 

850 IF FL6=1 THEN 870 >NK 

860 L$=UPPER*(L$) ->MF 

870 A=A+ASC(L$)+I >LX 

880 NEXT I >PE 

890 ' ;>TH 

900 CH$=STR$(A) >BG 

910CH*=RIGHT*(CH$,LEN(CHÏ)-1) >YW 

920 L=LEN(CH$):L2=LEN(CH$)/2 >WC 

930 A=VALiLEFT$(CH*,L2)> >TB 

940 C=INT(A/23) >BA 

950 P=A-(C*23) >MB 

960 C$=G$(P) >XF 

970 A=VAL(RIGHT*(CH$,L-L2)i >WL 

980 C=INT(A/23i:P=A-iC*23) >UW 

990 C$=C$+G$(P) >T6 

1000 ' >XD 

1010 FOR 1=1 TO 6 >BF 

1020 L*=MID$(A$, 1,1) >M 

1030 IF L$<"0" OR L$;"9" THEN 1060 >XQ 

1040 LI$=LI$+L$ YU 

1Ô50 NEXT >KH 

1060 >ï¥. 

1O70 IF CAv8 fHEN 108^ £Lb£ llw ,-ïL 

1080 PRINT LI$:TAB(10) ">":C$ >WA 

109O LI$="":GOTO 1170 >NF 

1100 LI$="":PRINT#CA.LEFT$(B$,55i;TAB(57) ">";C$ >QD 

1110 IF LEN(B$)<55 THEN 1170 >UV 

1120 F6=l >CH 

1130 B$=MID$(B$,56,LEN(B$J) >UC 

1140 PRINT#CA,LEFT$(B$,55) >VX 

1150 IF FG=1 AND CA<>8 THEN FG=0:GOSUB 1320:B0TQ 1160 >VE 

1160 GOTO 1110 >U 

1170 IF EOF=-l THEN CLOSEIN ELSE GOTO 710 >HY 
1160 IF CA=0 THEN CALL &BB«3: PRINT TAB(50) CHR$(24i;"UN >RK 
E TOUCHE... ";CHR$(24!:CALL &BB05 
1190 CLS:PRINT"MAINTENANT RECHARGEZ ";NF$:" ET CORRIGEZ >JD 

LES LIGNES QUE VOUS AVEZ NOTEES. . " 

1200 END >YB 

1210 ' >XG 

1220 ' ««««<«««««««« /XH 

1230 '< TRAITEMENTS DES ERREURS > >XJ 

1240 ' ««««<«««««««« ;>xk 

1250 ' >YA 
1260 IF ERR=25 THEN CLS:PRINT CHR*(7);CHR$(24); "FICHIER ,>YD 

NON ASCII ":CHR$ (24): END ELSE CONT 

1270 ' /YC 

1280 ' <;<«««««\<««^:««« >YD 

1290 < ATTENTE TOUCHE. . . > >YE 

1300 ' ««««««««««««< >XG 

1310 ' >XH 
1320 COM=COM+l:IF C0M>19 THEN CALL 8tBB03:PRINT TAB(50) >AG 
"UNE TOUCHE. . . " : CALL &BB05: CLS: COM=l 

1330 RETURN >FAA 



21 



u 



Carte RS 232 : 

deux programmes 
d'applications 





\ Philippe LEBEL 



Les possesseurs (et 
constructeurs) de la carte 
RS 232 décrite dans le 
numéro précédent vont 

K ou voir utiliser le fruit de 
>ur labeur, grâce aux 
deux programmes 
suivants : 



EMULCOM 

Par l'intermédiaire de la carte SIO, ce 

programme permet de convertir un 

AMSTRAD (664-6128) en terminal 

vidéo alphanumérique. 

Sur la voie A de la carte RS 232, on 

connectera un système de type 

ordinateur, modem... : sur la voie B, 

une imprimante série permettant des 

recopies d'écran. 

Une configuration est possible suivant 

le contenu des variables : 

— CODOA = -> le terminal envoie 
uniquement le code OD 

= 1 -> le terminal envoie 
OD suivi de OA 

- XONXOF = -> le terminal 
fonctionne en mode XON-XOFF 



16 A=&3000:F=&3343:L=i00:WHILE (R=F:F0R A=A TO A+15:READ 
=VAL('V+C$):S=S+K+65536*lS+K>32767i:IF A<=F THEN POKE A. 
20 NEXT:READ D$:T=VALi"V'+D$): IF TOS THEN PRINT CHR$<7): 
eur iigne";L:END ELSE L=L+5:WEND 
36 SAVE "emulcom",b,Sr30tt0,J',3343 

166 DATA 01,5C,FC,3E,EC,ED,79,01,7D,FC,3E,18,ED,79,3E,04, 
105 DATA ED,79,3E,47,ED,79,3E,03,ED,79,3E,41,ED,79,3E,05, 
110 DATA ED,79,3E,28,ED,79,3E,01,ED,79,3E,00,ED,79,01,7F, 
115 DATA FC,3E,04,ED,79,3E,C7,ED,79,3E,03,ED,79,3E,41,ED, 
120 DATA 79,3E,05,ED,79,3E,28,ED,79,3E,01,ED,79,3E,00,ED, 
125 DATA 79, AF, 32, 48, 33, 32, 46, 33, 32, 45, 33, 32, 44,33, 32, 4D, 
130 DATA 33, 3E,02,CD,0E,BC,CB,81,BB,C3,8F, 31, 3A, 45,33,67, 
135 DATA C2, 8F, 31, CD,09,BB,D2,8F, 31, 32,47, 33,FE,7F, 28,32, 
140 DATA FE,80,F2,D9,30,3A,44,33,B7,28,0B,3A, 47,33, FE, 20, 
145 DATA FA,11,31,CD,5A,BB,3A,47,33,FE,0D,20,0F,3A,48,33, 
150 DATA B7, CA, AC, 30, CD, D5, 32, 3E, 8A, 32, 47, 33, CD, D5, 32, C3. 
155 DATA 8F,31,3A,44,33,B7,28,16,CD,78,BB,11,01,01,AF,ED, 
160 DATA 52,CA,8F,31,3E,08,CD,5A,BB,3E,10,CD,5A,BB,3E,08, 
165 DATA 32, 47, 33, CD, D5, 32, C3, 8F, 31 , FE, EO, CA, 19, 32, FE, F4. 
170 DATA C2,EF,30,21,F8,BF,36,A2,23,36,B9,31,F8,BF,C9,FE, 
175 DATA F5,C2,8F,31,CD,ûC,BB,C3,8F,31,DD,BE,00,28.0B,DD, 
18» DATA 23,DD,23,DD,23,10,F3,C3,8F.31,DD,6E,01,DD,66,02, 
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185 
190 

195 
2Ô0 
205 

210 

215 
220 
2/j 
230 

240 
245 
250 
255 
260 
2b5 



DHTA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DhTA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 

DhTA 

DATA 



E9,CD, 

t>D.28, 
0D.CD, 
21.01. 
8F, 31, 
3E.AA, 
28, ED, 

3E,FF, 

7TÎ cr 

, iJ,rL, 

47, LA, 
Eu. 78. 
BB, 11, 
CD,5A, 
E7.32. 
3E.0B, 
31, 3E, 
31, 3E, 
CD, 7 6. 



D5.32, 

05. CD, 
5A,BB, 

01, CD, 
3 A, 46. 
ED,79, 
7 9,01, 
32.45. 
3E.05, 
6C,30, 
FB,CB, 

01, vU, 

BB,18, 

06,1F, 

CD.5A, 
08, CD. 
12, CD, 
BB.22. 



C3.DE. 
SA.BB, 
C3,8F, 
75, BB, 
33, B7, 
ED,78, 
7C.FC, 

jw,Cj, 

ED,79, 
F3.3E, 
BF.FE. 
AF.ED, 
8A.LD, 
C3.FA. 
BB.C3, 
5A, BB. 
5A,BB. 
46,33. 



31. 
C3, 
31. 

C2, 
CB, 
ED, 
BF, 
3E. 
95, 
20, 

3i, 

5A, 

39, 

C3, 
El, 



3E,20, 

8F, 31, 
3E.0D, 

8F,31, 
8F, 31. 
47.28, 
78,FB, 
31, AF. 
AA.ED, 
ED.79. 
FA.DA. 
iti , L6 , 
BB, 18, 
CD. 78. 
31. CD, 
8F, 31, 
8F,31, 
CD. 81. 



CD, 5A. 
3A.46, 
CD,5A, 
32.47, 
01. 7D, 
FA.F3, 
FE, 11, 
32,45, 
79,01, 
3E.28. 
31. FE, 
3E,08, 
B5,FE. 
BB, 7D, 
76, BB, 
3E.14, 
21.01, 
32. CA, 



6B,C3,8F,31. 
33, B7. 20, 08. 
BB,3E,0A, 18, 
33, CD. D5. 32, 
FC,3E,05,ED. 
3E,05.ED,79, 
CA, 8F, 31, 16, 
■j-j , C3 , 8F , 3 1 , 
7D.FCED.78, 
ED.79, 01, 7C, 
7F, 20, 17, CD, 
CD,5A,BB,3E. 
1B,28.B1.DD, 
FE,01,CA,8F, 
7C.FE.01.CA. 
CD,5A,BB,C3. 
01,E5,22,49, 
8F. 31, CD, 7E, 



FE.3324 
3E.8896 
E3,8F78 
C3.965E 
79.9D2D 
3E.H5EE 
D9.HEDF 
01,B526 
CB,BE40 
FCC5CE 
76.CFD4 
10.D5F4 
21,DE47 
31,Eô78 
8F,EEFA 
8F.F65C 
33,FBE6 
BB, 0479 ' 



275 DATA CD. 89, 32. 21, 01. 01. 16, 0A. 22. 49.33. E5, CD. 81. 32, El. 0A2A 
280 DATA 28,21,CD.75,BB,CD,50,BB.38.02,3E.20,CD,94,32,2A.10AD 
265 DATA 49.33,24. 7C.FE, 51. 20,E0.CD,89, 32, 26,01, 2C7D.FE, 1 7ùE 
290 DATA 1A,20,D5,2A,4B.33,CD.75,BB.CD,7B.BB,CD,89.32,3A.1EE 7 
295 DATA 46,33,B7,C2,8F,31,3E,11, 32,47, 33,CD,D5,32,C3,8F,25BA 
300 DATA 31,ED,5B.4B,33,AF.ED,52,C9,3E,0D.CD,94,32.3E.0A.2C8E 
305 DATA CD, 94, 32, C9,E5,F5,3A,4D, 33,67,20,28, 01, 7F, FC.ED.34E6 
310 DHTA 78,CE, 47, 28,1F, 01, 7E,FC.ED,78,CB,BF,FE. 13, 20,14. 3L66 
315 DhTA 01,7F,FC,ED,78,CB,47,28,F7,01,7E,FC,ED,78,CB,8F,45E2 
320 DATA FE,ll,20,EC,01,7F,FC,ED,78,E6,04,28,F7,F1.01,7E,4E57 
325 DATA FC.ED,79 < El,C9,01,7D.FC.ED,78,Eô.04,28,FA,3A,47,57CF 
330 DATA 33,01, 7C,FC,ED,79,C9,10.1F,31, 09,17,31, 07.1F,31,5CB2 
335 DATA 08,1F,31,0A,1F,31,0B,1F,31,0C,1F,31,0D,1F,31,00,5E78 
340 DATA 8F, 31, 01, 40, 31, 02, 8F, 31, 03, 8F. 31, 04, 8F. 3i, 95, 8F, ù287 
345 DATA 31, 06. F8, 31. 0E, 3F, 31, 0F, 8F, 31. 11,49.31, 12, 6F. 31, 66E1 
350 DATA 13, 52, 31, 14, 8F, 31, 15. 80, 31, i6, 8F, 31, H, 11. 32, 18. 6A5v 
355 DATA 09,32, 19,68. 31. 1A.E7.31. 1C.8F,31. iD,8F,3l. iE,8F,6EFE 
360 DATA 31. IF, 8F, 31, 00, 00, 00, 00, 00, 00,00,00, 00,00, 00,00, 700EI 



10 A=&3000:F=&3203:L=100:WHILE A ; =F: 
=VAL ( "&"+C*i : S=S+K+65536* (S+1032767 i 
20 NEXT:READ D$:T=VAL("lk"+D$):IF TO 

eu.r iiqne":C:END ELSE L=L+5:WEND 
3t' SAVE "transtii".D.?î3000,î3203 
100 DATA 3E.02.CD,0E.BC.2A,FE.3l.22. 
105 DATA 31, CD, F7, 30, CD. 01. 31. 21. 03, 
110 DATA 77,BC.30.10,FE, 16,28, 11,21, 
î 15 DATA BC,C3.BC,30,21.97.31,18.F2, 
120 DATA 17.FE.0A.28,F7,EB,21,7F,A5, 
\/5 DhTA 63,31, 18.07,77,23, 18,E4,28, 
130 DATA 01, 5C,FC,3E,EE,ED, 79,01, 7D, 
135 DhTh ED.?9.3E,47.ED.79.3E.03,ED, 
140 DATA ED.79.3E,AA,ED,79,3E,01,ED, 
145 DATA FE,3l,B7,ED,52,CA,B6,30,2A, 
150 DATA 7D,FC,ED,78,E6,04,28,FA,3A, 
155 DATA B7.13,ED,52.20,E2,21,B2,3i. 
160 DATA F7,30,CD,61,BB,CD,06.BB,FE. 
165 DATA 30,FE,7A,F2,C5,30,CD,5A,BB, 
1 7 DATA CA.05,30,FE,6F,CA.05,30,CD, 
175 DATA 23,36, B9, 31, F8,BF,C9,7E,FE, 
180 DATA F6,21,E7,31,E5,21, 03,32,01, 
165 DATA 08. 20. 07, 0D. FA, 05, 31, 26, 18, 
190 DATA C8,0D,79,FE,22,28,E4,7E,0C, 
195 DATA B1,BB,CD,06,BB,FE,7F,20,02, 
200 DATA 06,28.0C,FE,20,38,EB,FE,FC, 
205 DhTA B4,BB,4E,ùF,6D.20,64,65,20, 
210 DATA 20,38,00,46,69,63,68,69,65, 
215 DATA 67, 72,61, 6E,64,0D,0A,00,54, 
220 DATA 46, 69, 63,68,69, 65, 72. 20, 69, 
225 DATA 69,62,6C,65,0D,0A,00,41,43, 
230 DATA 68, 69, 65, 72, 20, 69, 6D, 70, 6F, 
235 DATA 0A, 00, 54, 52, 41, 4E, 53, 46, 45, 
240 DATA 49,45,52,20,4F,4B,0D,0A,00, 
245 DATA 74,72, 65, 20,74,72,61, 6E,73, 
250 DATA 2F, 4E, 29, 20, 3F, 20, 00, 21,16, 
255 DATA 0A,CD,FB,31,3E,20,CD,FB,31, 
260 DATA 27, 3A, 00, 4A, 00, 00, 00, 00, 00, 



FOR A=A TO A+15:READ C$:K 
:IF A<,=F THEN PÛKE A.K 
6 THEN FRINT CHR*(7):"Err 



0», 

EU, 



00, 32, 

32. «D. 
78,31, 

2A, " 
b 7 . 
DA.22. 
FC.3E, 
79, 3E, 
3E, 

7 1 
_' ^ • 

T "1 

F7, 
28, 

CD. 
31, 
C8, 

00, 

0C, 
CD, 
08. 
E7. 
69, 
20, 
50, 

DO, 

45. 

7 T 

54. 
t'A. 

65, 

C3, 

08. 



79 

00, 

02, 
CD, 
0D, 

F5, 
E7. 
00 . 

•H!, 
10, 

3E, 

26. 
4c. 

59. 
6E, 
43. 
73, 
3i, 
oD. 
66, 
31, 
3E. 

00, 



CD, &5. 
41.11. 
CD.F7, 
32. CD, 
52,EB, 
00,32. 
18, ED, 
41, ED, 
00, ED, 
1A,32, 
01, 7 C, 
30,21. 
1C.FE, 
E7.31, 
21, F8, 
CB,5A, 
CD, 2F. 
FE.0D, 
ED.31, 
FE,0D, 
FE.EF, 
63,68, 
74.72, 
45,20, 
6F, 6D, 
53.20, 
69.62, 
20,46, 
55 . 6E , 
72,74, 
F7,30, 
C3,5A, 

00,00, 



BC.21. 
27.32. 
3o. CD, 
80. BC. 
30,05, 
CD.7A. 
7 9. 3E. 
79,3t. 
79, ED, 
02,32, 
FC,ED, 
C9,31, 
20, FA. 
Fl.FE, 
BF,36, 
BB.23, 
31.77, 
3A.Ô3. 
18, DC. 
26.10, 
28, E3, 
69,t»5, 
6F, 70, 
o4,o5, 
70,61, 
46,69, 
61,65, 
49,43, 
20,61, 
20,28, 
FE,06, 
BB,27, 

00,00, 



52.05E5 
CD.BAE4 
7D.11AC 
30, 189F 
21.2045 
BC.26B7 
04.2E1A 
05.353A 
5B.3D7F 
01.4331 
79.4B68 
CD, 5353 
C5.5C3D 
4F,66C6 
A2.6EC6 
18, 76EA 
FE.7CF7 
32.803C 
CD, 88»F 
FE.8EFF 
C3.9640 
72.9E&C 
20.A389 
20.A7F7 
74.AE2C 
63,B270 
0D.B87C 
48,BC79 
75.BFFA 
4F.C5D5 
20.CB22 
3A,D1FB 
00,D2A6l 



= 1 -> pas de contrôle 
XON-XOFF 

- ECHO = -> mode de 
transmission en FULL DUPLEX 

= 1 -> mode HALF 
DUPLEX 

- PTONOF = -> l'imprimante 
fonctionne en mode XON-XOFF 

= 1 ->pas de contrôle 
XON-XOFF 

Trois touches de fonction sont 
programmées : 

- [COPY] : permet une recopie 
d'écran sur l'imprimante série jusqu'à 
la position du curseur. 

- [SHIFT] + [I] : permet de sortir du 
programme et de revenir au BASIC 

- [SHIFT] + [I] : permet d'effacer 
l'écran. 

La voie A de la carte SIO est 
configurée en . 

- 9600 Bds 

- 7 bits 

— 1 stop bit 

— parité paire 

La voie B de la carte SIO est 
configurée en : 

- 1 200 Bds 

- 7 bits 

— 1 stop bit 

— parité paire 

L'utilisateur aura, bien sûr, tout loisir 
de modifier ces paramètres en 
fonction de ses besoins. 
L'organisation générale du programme 
pourra être modifiée suivant 
l'utilisation envisagée et le type 
d'appareil connecté. Avis aux 
programmeurs... 

TRANSFIL 

Après avoir entré le nom d'un fichier 
ASCII, le programme se charge de le 
lire sur disquette, de le stocker en 
mémoire et enfin, si tout est correct, 
de le transférer par l'intermédiaire du 
canal A de la carte SIO. 
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AMSTRAD & 
MINITEL 



Devant l'avalanche de demandes concer- 
nant l'article du n° T4, voici à nouveau le 
plan du câble AMSTRAD/MINITEL décrit 
par Eddy Dutertre. 



Connecteur venant sur la sortie imprimante de L'AMSTRAD 
(2 fois 1 7 points) 



Prise DIN 

vers le 

MINITEL 




Tout d'abord, précisons qu'il existe deux 
types de Minitel : 

• le standard à modem non retournable 
(inutilisable), 

• le modèle, plus sophistiqué, à modem 
retournable. 

C'est ce dernier qu'il faudra posséder 
pour notre utilisation. Il se reconnaît par 
la lettre "R" sur la plaque signalétique 
se trouvant en général sous l'appareil. 



Quels devront être les ingrédients ? 
Et bien, c'est simple, le programme ci- 
dessous, un simple câble de liaison à réa- 
liser et, bien sûr, un correspondant. 
Rassurez-vous, même si vous êtes seul, 
vous pourrez tester le bon fonctionne- 
ment de l'ensemble avec un petit magné- 
tophone à cassette enregistrant les 
signaux BF sortant du Minitel (ligne). 



LE CABLE DE LIAISON 

C'est le seul montage à réaliser. Il faut 
disposer d'un connecteur femelle du type 
de celui utilisé pour l'imprimante, d'un 
câble 3 fils ou 2 fils + blindage et d'une 
prise DIN 5 broches. Ce câble réalisera 
la connexion entre la prise imprimante 
AMSTRAD et la prise DIN du Minitel. 

La longueur du câble pourra atteindre, s'il 
est blindé, 3 à 4 mètres. La broche 2 de 
la prise DIN est à la masse. 



FONCTIONS EN COULEUR 



Mieux vaut tard que jamais. 
Voici enfin le catalogue de 
fonctions qui aurait dû norma- 
lement être joint au listing de 
Richard COTTÉ (n ° 24 de CPC 
page 85). Vous allez pouvoir 
délirer en couleurs sur votre 
écran. 



FNf(x) 


Bornes 
en X et 
en y 


Bornes 

en z 


COS((x-2) A 2+y*y)+COS((X+2)*2+Y*Y) 


-4,4 


-2,2 


COS(x*y*exP(-y/5)) 


-10,10 


-1,1 


COS(x-y*y) 


-10,10 


-1 ,1 


COS(x*x+y*y) 


-10,10 


-1 ,1 


COS(x*x*y*y+x*x*y+x*y-1 ) 


-5,5 


-1,1 


COS(7*COS(x)-2*SIN(y)) 


-10,10 


-1 ,1 


COS(x)*COS(y) 


-6,6 


-1 ,1 


6*COS(x*y)-5*SIN(3*y) 


-5,5 


-11,11 


COS(x*EXP(-y/5))+COS(y*EXP(-x/5)) 


-10,10 


-2,2 
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Bien débuter avec le CPC 6128 

Vous qui venez d'acquérir un CPC 6128, réussissez à coup sûr vos 
débuts. Apprenez pas à pas les notions de programmation du Basic, 
de graphisme et de son. Découvrez les possibilités de votre lecteur 
de disquette (formatage, fichiers et fichiers ASCII, protection des 
programmes, sauvegarde, fusion, suppression de fichiers...). 
(Réf. ML 146) 99 FF. 200 p. 



E PLEIN DE TONUS 
POUR VOIRE CPC. 



Débutant ou utilisateur confirmé de CPC 
464, 6128, exploitez à fond les capacités de 
votre machine à travers des informations pré- 
cises, des explications et exemples clairs, le 
langage machine et le Basic. Découvrez tout sur 
le CP/M et votre lecteur de disquette pour pro- 
grammer en vrai "pro". 




Pour tous ceux qui consi- 
dèrent que le Basic n'est ni 
assez puissant ni assez 
rapide. Découvrez les 
bases de la programmation 
en langage machine, au 
mode de travail du proces- 
seur Z 80 en passant par 
une description précise de 
ses instructions ainsi que 
l'utilisation des routines 
systèmes. Le langage 
machine n'aura plus de 
secret pour vous grâce aux 
nombreux exemples et programmes complets (assembleur, 
désassembleur et moniteur). (Réf. ML 123) 129 FF. 
(Réf. ML 223) 249 FF avec la disquette. 2S0 p. 

Le grand livre du Basic sur CPC 6128 

Exploitez à fond toutes les capacités de l'excellent Basic Locomotive 
et maîtrisez les bases de la programmation et ses domaines profes- 
sionnels (tris, fenêtres, masques, écrans, traitement des erreurs, 
protection contre la copie) et le fonctionnement interne du Basic. 
Découvrez les domaines 
"créatifs" : graphismes, sons 
et musique. Gérez le stockage 
des données et le lecteur de 
disquette, son accès direct 
avec l'AMDOS et les interrup- 
tions Bankwrite, Bankfind 
et leurs applications RAMDISK. 
Enfin, des listings d'applica- 
tions comme traitement de 
texte, budget familial... 
(Réf. ML 168) 149 FF. 
(Réf. ML 268) 249 FF avec 
la disquette. 260 p. 




Le livre du CP/M 

Toutes les explications indispensables pour une bonne utilisation 
et compréhension de CP/M sur CPC 464, 664, 6128 et PCW 8256 : 
stockage des données, protection contre l'écriture, codification 
ASCII, utilisation des program- 
mes CP/M, les versions CP/M ^ — Btsw ^ SECTEUR 
2.2 et CP/M plus (3.0)... et la 
structure interne de CP/M pour /M ^k BLOC 

les programmeurs avancés. / -A <5i2 oct 

(Réf. ML 128) 149 FF. 220 p-. 

lit ^T \~\ \ PISTE (TRACK) 

Le livre du lecteur 
de disquette 

Tout sur la programmation et 
la gestion des accès disque 
avec les CPC 464, 664, 6128 
et le FLOPPY DDI-1 ! Profitez 
des nombreuses informations, 
des précieux conseils et exem- 
ples accompagnant chaque 
chapitre. Disposez des listings 
d'utilitaires ultra-performants 
comme un moniteur disque, 
une gestion de fichiers rela- 
tifs... ainsi que d'un listing du 
DOS commenté, de la descrip- 
tion électronique de l'appareil 
et d'une gestion de fichiers. 
(Réf. ML 127) 149 FF. 
(Réf. ML 227) 269 FF avec 
la disquette. 390 p. 




Les indispensables CPC 

Trucs et astuces pour l'Amstrad CPC 
(Réf. ML 112) 149 FF. 

Programmes Basic pour les CPC 
(Réf. ML 119) 129 FF. 

Graphismes et sons CPC 464 
(Réf. ML 124) 129 FF. 

Des idées pour les CPC 
(Réf. ML 132) 129 FF. 

La bible du CPC 664/6128 
(Réf. ML 146) 199 FF. 

Le Basic au bout des doigts CPC 
464, 664, 6128 
(Réf. ML 118) 149 FF. 

Communications, modem et 
Minitel sur Amstrad CPC 
(Réf. ML 151) 149 FF. 
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Beaucoup de nos lecteurs 
n'ont jamais osé avouer qu'il 
leur arrivait de ne pas pou- 
voir recharger un pro- 
Sramme pourtant enregistré, 
ne faut pas croire que cela 
ne concerne que les débu- 
tants... Oh que non I Soit par 
"erreur technique", soit par 
manque d'organisation. 

La chose est plus fréquente sur cassette 
que sur disquette, nous insisterons donc 
sur ce premier cas. Ne croyez pas que 
nous allons énumérer les soixante-dix 
commandements des supports magné- 
tiques, vous les avez certainement lus 
(ou survolés) plusieurs fois... 
Le mieux est de faire connaissance avec 
certains petits détails de fonctionne- 
ment, qui ne figurent pas dans le manuel 
et qui vont alors élucider certains 
"mystères malheureux" dont vous avez 
peut-être été victime. Si ce n'est pas 
(encore) le cas, vous saurez alors vous 
éviter de commettre telle ou telle gaffe 
car vous devinerez le risque. Et si un mal- 
heur survient, par étourderie, ces notions 
nouvelles vous permettront souvent de 
réparer les dégâts. 

N'est-ce pas plus efficace que des con- 
seils "bruts" ? 

L'autre ennemi des sauvegardes est le 
manque d'organisation : au début, on ne 
se méfie pas et l'on est tout surpris de 



Les cassettes audio 

Elles et les platines cassettes ont été 
conçues pour le son, UNIQUEMENT. Les 
utiliser en informatique constitue une 
prouesse technique ; on peut donc tolé- 
rer certaines servitudes et des perfor- 
mances très inférieures à celles des dis- 
quettes. Seul intérêt des sytèmes casset- 
tes : le prix et c'est un argument de 
poids... A titre de consolation, sachez 
que l'on ne pourrait pas enregistrer de la 
musique par un lecteur de disquettes, 
c'est techniquement impossible. Je 
m'explique : 

L'ensemble bande magnétique + tête de 
lecture-enregistrement + l'électronique 
qui lui est affectée a été étudié pour 
reproduire fidèlement des variations très 
rapides de volume (le son). Autrement 
dit, il sait magnétiser la bande à des 
niveaux très variables, et sans à-coups, 
de zéro à "très fort". Or, en informati- 
que, on se moque de ces milliers de 
niveaux possibles ! On n'en veut que 
DEUX, qui seront baptisés "1 " et "0"... 
L'ordinateur qui veut transmettre ces bits 
1 et doit alors les CODER en un signal 
"musical" afin qu'il puisse être enregis- 
tré, compris, par un magnétophone. 



Ce codage musical est très complexe, 
non pour le secret mais pour assurer une 
sauvegarde et une lecture sans risque 
d'erreur. Un exemple : un logiciel du 
commerce va représenter environ 
300 000 bits. Si un seul est perdu, l'oc- 
tet en question est incomplet, d'où une 
incohérence, d'où plantage quasi immé- 
diat ! Le tristement célèbre "read error 
a" (ou "b"). Donc aucun droit à l'erreur, 
même 1 sur 300 000... Voilà pourquoi 
j'ai parlé de prouesse technique. Notez 
qu'en cas de "loupé", un lecteur de dis- 
quettes fait (à notre insu) une relecture 
du passage, mais avec un magnéto cas- 
settes, c'est bien sûr impossible. 
Avec une platine K7 ordinaire, telle celle 
du CPC 464, la fréquence maxi se situe 
vers 6 à 8000 Hz ( = signaux, impulsions 
par seconde) ; au-delà, le niveau à la lec- 
ture s'écroule et la "pureté" avec. Une 
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sauvegarde à 2000 bauds ( = 2000 bits 
par seconde) obtenue par la commande 
SPEED WRITE 1 doit correspondre à peu 
près à un signal modulé de l'ordre de 
4000 Hz. Il existe des utilitaires qui per- 
mettent de sauvegarder à des vitesses 
très supérieures, 4000, 6000 bauds. Un 
petit calcul rapide vous permet d'évaluer 
le risque ainsi encouru... 
Une bande "ferro" ordinaire de bonne 
marque peut aller jusqu'à 1 3000 Hz 
environ ; une de la meilleure qualité pos- 
sible approchera les 20000. Mais le gain 
sur une platine K7 de bas de gamme sera 
infime, quelques centaines d'hertz seu- 
lement. Donc inutile d'alimenter votre 
464 avec des bandes super HI-FI. Et sur- 
tout pas avec des bandes à l'oxyde de 
chrome (Cr02) car il ne pourrait pas effa- 
cer complètement l'enregistrement pré- 
cédent ! 

Techniquement, on pourrait enregistrer 
et lire à 6000 bauds sur une platine cas- 
sette HI-FI avec une cassette au 
chrome ; mais je vous signale que le prix 
atteint serait alors celui d'un lecteur de 
disquettes. 



tion souvent irrégulière (surépaisseurs en 
vagues ou manques), niveau de repro- 
duction très faible et bruit de fond impor- 
tant. Pour enregistrer grand-père passe 
encore, mais surtout pas pour l'informa- 
tique ; même pas à 1000 bauds. 
Une autre gaffe consiste à utiliser de la 
C-120, car le support est trop mince, 
trop fragile pour une mécanique non HI- 
FI ; d'autre part, on observe souvent une 
faible copie du signal magnétique d'une 
spire à l'autre... 

Revenons au signal codé : il n'y a pas que 
la fréquence qui compte, il y a aussi le 
volume à la lecture. Il semblerait, après 
examen (difficile) à l'oscilloscope, qu'il 
y ait DEUX niveaux (amplitudes) dans les 
signaux. Conséquences, si le niveau 
moyen est trop faible, pas de détection ; 
s'il est trop fort (saturation), les niveaux 
"bas" seront presque aussi forts que les 
"hauts" et là, pas de décodage possible. 
Avec un CPC 464, aux réglages fixés en 
usine, on ne cours pas ce risque. Sauf 
si on veut dupliquer notre précieuse cas- 
sette par copie entre deux magnétopho- 
nes. 




La qualité d'enregistrement sur cassette 

Le manuel préconise de sauvegarder à 
1 000 bauds et c'est SPEED WRITE qui 
est pris par défaut. Je ne suis pas du tout 
d'accord face à un tel pessimisme. Le 
2000 bauds est fiable sur des cassettes 
"ferro" de bas de gamme mais de mar- 
que connue, ou avouée, telles celles de 
grandes surfaces (Carrefour, Mam- 
mouth...). 

En revanche, l'auteur déconseille très 
vivement les marques bidon ou inexis- 
tantes du genre "Trois C-60 sous blis- 
ter pour 10 francs". Il s'agit de rebuts 
de fabrications conditionnés par des offi- 
cines plus ou moins fantômes : Enduc- 



II faut savoir qu'un magnétophone non 
HI-FI est équipé d'un dispositif électro- 
nique assez farceur, le C.A.G. ou "con- 
trôle automatique de gain" qui règle 
automatiquement le volume à l'enregis- 
trement, ce qui va "comprimer" notre 
signal. C'est très bien pour la parole, 
mais nuisible en musique et en micro- 
informatique. Le niveau moyen à la lec- 
ture est plutôt faible, parfois à la limite 
de ce que peut tolérer le 464. Donc, pour 
dupliquer votre bande, vous pouvez la lire 
sur un magnéto ordinaire, mais il faut 
enregistrer sur une platine HI-FI en posi- 
tion "volume manuel", et assez fort, 
mais sans saturer. 

Les éditeurs de logiciels exploitent sou- 
vent ce fait pour limiter la piraterie de 
leurs cassettes : celles-ci sont volontai- 
rement enregistrées à des volumes fai- 
bles et avec peu d'écart entre les deux 
niveaux, à ras de la tolérance des CPC 
464. Ainsi, une copie faite entre deux 
magnétophones conduira à l'échec au 
chargement. Parfois, ils "envoient le 
bouchon trop loin" et l'original est pres- 
que impossible à charger. A ce propos, 
on se souvient d'une certaine série de 



"SORCERY" qui fut un désastre, envi- 
ron 70 % de retours au dire d'un ven- 
deur FNAC... 

La cycle d'un enregistrement cassette 

Supposons la sauvegarde d'un pro- 
gramme BASIC de 5000 octets. 

— Pendant quelques secondes, silence 
mais le magnéto tourne : ne croyez sur- 
tout pas que cette pause au départ soit 
suffisante pour passer l'amorce transpa- 
rente de la cassette ! 

— C'est tout d'abord l'enregistrement de 
ce que l'on appelle l'étiquette du pro- 
gramme (ou du fichier) : on y trouve la 
vitesse 1000 ou 2000 bauds, le type 
(BASIC, BASIC protégé, binaire ou 
ASCII), le nom de baptême et la taille 
exact en octets, d'où le nombre de 
"blocks". 

— La succession des blocks de 
2048 octets maxi. Chacun débute par 
une mini-étiquette rassemblant le nom, 
le numéro de block et sa taille exacte. 
Pour nos 5000 octets, on aura donc 
deux blocks complets, plus un troisième 
pour les 1000 octets restants. 

A la lecture, même scénario, mais à la 
fin de chaque block, l'ordinateur vérifie 
que le nombre d'octets entrés est égal 
à ce qui était annoncé dans l'étiquette, 
sinon il affiche "read error". 
A la fin du dernier block se trouve un 
signal de fin : il sera exécuté s'il n'y a 
pas eu de "read error" dans un des 
blocks. Si c'est malheureusement le cas, 
le magnéto continuera de tourner après 
cette fin non validée. Conclusion, si un 
"read error" apparaît, il est inutile de 
poursuivre le chargement, c'est sans 
appel I 

A présent, parlons des disquettes : 

Constitution d'une disquette 3" 

Dans le boîtier se trouve un disque de 
plastique enduit sur ses deux faces, 
découpé à l'emporte-pièce. Sa "rigidité" 
est à peu près celle du papier de cette 
revue. Des feutres de guidage assurent 
une pseudo planéité. Il comporte deux 
trous, un central renforcé par un solide 
moyeu d'entraînement et un petit excen- 
tré, d'environ 3 mm de diamètre, qui va 
servir à repérer le début de chaque tour 
(par une cellule photo-électrique). 
Insistons sur le fait que ce disque magné- 
tique est uniforme, comme une feuille de 
papier non ligné. Le fabricant ignore le 
nombre de pistes que vous désirez y 
mettre, c'est à l'utilisateur de tracer ses 
pistes, c'est le rôle du FORMATAGE : 
Celui-ci va tracer 40 pistes de guidages 
concentriques et sur chacune, neuf repè- 
res de SECTEURS ; la position du petit 
trou permet alors de numéroter ces sec- 
teurs. Le drive peut alors écrire sur cette 
face de disquette formatée. Un secteur 
peut contenir 512 octets. Calculons la 
capacité d'une face de disquette : 
512 x 9 x 40 = 184 320 octets, ce 



27 



qui, divisé par 1024, donne 180 kilo- 
octets. 

Le principe physique de la magnétisation 
de ces aimants microscopiques, enrobés 
dans le vernis de la disquette, est fon- 
damentalement différent du principe des 
bandes : au lieu de lire des variations 
continues de forces d'aimantations, on 
se contente ici d'observer des change- 
ments brutaux de polarités magnétiques, 
"nord" ou "sud". C'est plus compliqué 
que cela mais je simplifie... Avantage, la 
vitesse est de l'ordre de 1 20 000 bauds, 
soixante fois plus rapide que sur bande I 

Les trois types de formatages 

La commande FORMAT sous CPM va, 
après formatage, enregistrer sur les deux 
premières pistes un programme de 9 kilo- 
octets que l'on appelle "SYSTEME" ou 
"DOS" ou "CPM". Il va compléter 
l'AMSDOS résidant dans les CPC 664 et 
61 28 où l'interface drive des 464. Grâce 
à cela, nous pourrons taper des ICPM. 
On dit que cette face de disquette est 
"formatée Système". Certes, on a perdu 
9 kilo-octets, mais c'est vivement 
recommandé par l'auteur, prudence 
oblige... 

FORMAT V (V comme Vendeur) a peu 
d'intérêt pour nous : c'est idem 
"système" mais sans l'enregistrer tout 
en RESERVANT SA PLACE. On pourra 
le transférer ensuite par le programme 
SYSGEN de la disquette CPM. Pour- 
quoi ? Parce que si le Système est indis- 
pensable sur tel logiciel du commerce, 
l'éditeur n'a pas le droit de le "vendre" 
avec son produit ; c'est à l'utilisateur 
final d'y copier le sien. Une des lois sur 
le COPYRIGHT ; sans commentaires. 

FORMAT D donne une disquette forma- 
tée DATA. Toute la place est disponible ; 
tous les logiciels du commerce sont for- 
matés DATA. Mais pour les nôtres, qu'il 
s'agisse de programmes ou de fichiers 
personnels, je vous déconseille forte- 
ment cette fausse économie car un jour 
vous serez piégé par l'absence du 
Système. Impossible de le rajouter 
ensuite par SYSGEN. Vous pourrez cal- 
culer que ces 9 Ko si souvent utiles 
représentent un "gaspillage" de 75 cen- 
times par face ; donc une très mauvaise 
économie. 

Quand au FORMAT I "conforme IBM 
PC" j'en cherche encore une application 
pratique, car cela concerne les disquet- 
tes IBM PC formatées en CP/M (jamais 
vues !) et comme ces micros utilisent les 
formats 5" 1/4 ou 3" 1/2... 



Le catalogue d'une disquette 

C'est la table des matières, le descriptif 
de tout ce qu'il y a sur une face de dis- 
quette. Le catalogue se réserve 2 kilo- 
octets ; c'est pourquoi il reste 
180 - 2 = 178 Ko sur une disquette 
formatée DATA et 180 - 2 - 9 = 
169 Ko sur une formatée Système. 



Il se loge sur la première piste d'une dis- 
quette DATA, mais A LA SUITE du pro- 
gramme Système si la disquette a été 
formatée Système ou Vendeur. 
Cette plage réservée correspond à un 
maximum de 64 noms de programmes 
ou fichiers. Chacun d'entre eux est réfé- 
rencé comme suit : 

— Le numéro de USER (généralement 0) 
qui est une sorte de classement par 
groupe, utile avec disque dur mais de peu 
d'intérêt sur disquette. 

— Le nom du fichier, ainsi que certains 
paramètres optionnels, BASIC protégé, 
non effaçable par ERA, invisible par CAT 
ou DIR, etc. 

— Enfin, la LOCALISATION, les numé- 
ros de pistes et de secteurs où il a été 
enregistré. 



Vous avez sans doute été surpris par le 
fait qu'un enregistrement même très 
court occupe 1 kilo-octet lorsque l'on 
tape CAT. L'explication est que le CPC 
enregistre par BLOCS de 1024 octets, 
soit deux secteurs à la fois. (Cela rappelle 
la sauvegarde sur cassette par "block" 
de 2 kilo-octets). Supposons 1 5 fichiers 
de 24 octets ; ils feront 1 5 titres de 1 
Ko, mais sur la disquette, il y aura ainsi 
1 5000 octets "gaspillés", car les com- 
pléments de blocs sont en quelque sorte 
remplis par des "blancs". (Même chose 
sur cassette pour le dernier block). 




La gestion de la disquette par CP/M 

Comment se passe un effacement de 
fichier par ERA ? Ultra simple : dans le 
catalogue, le numéro de USER devient 
229, c'est tout I Deux conséquences : 
le nom n'apparaît plus par CAT ou DIR. 
Le contenu du fichier ou programme est 
toujours intact, mais les zones qu'il 
occupait sont désormais disponibles 
pour d'autres sauvegardes, lorsque la 
place sur disque deviendra insuffisante. 
Il est alors possible de ressusciter un 
fichier effacé par erreur en remplaçant ce 
229 par 0, (sauf s'il a été écrasé par 
d'autres sauvegardes) ; par exemple, 
avec le bon vieux logiciel "ODDJOB". 
Lorsque l'on a fait le ménage en effaçant 
de nombreux petits programme pour y 
loger un gros, on devine alors que ce der- 
nier va "boucher les trous" çà et là, il 
peut être fragmenté, éparpillé sur des 
pistes non consécutives. Ce n'est pas 
très gênant, au plus un léger ralentisse- 
ment pour le chargement. 
Ceci amène une remarque concernant la 
confidentialité : il est arrivé qu'une per- 
sonne serviable se trouvant à court de 
disquettes vierges pour délivrer une 
copie d'un petit programme, prenne un 
double de disquette très confidentielle et 
en "l'effaçant" d'abord par ERA *.* : Si 
le destinataire est du genre curieux, il lui 
faudra moins d'une minute pour remet- 
tre au catalogue la plupart des titres effa- 
cés. Rappelez-vous que la seule méthode 
pour effacer réellement une disquette est 
de la reformater. 



Une disquette au contenu précieux doit 
être dupliquée. On ne sait jamais quel 
malheur il pourrait arriver à un exemplaire 
unique... L'autre cas est une copie pour 
un ami. Pour cela, il faut faire la distinc- 
tion entre deux méthodes ; la copie 
"physique" et la copie "logique" : 

— La copie physique est comparable à 
une photocopie de l'original, car c'est 
une reproduction fidèle secteur par sec- 
teur. C'est ce que l'on obtient par DISC 
COPY ou par certains logiciels de 
"copies autorisées" tels que ODDJOB, 
HERCULE, DISCOLOGIE, etc. Avantage, 
c'est très rapide et le formatage de la 
copie est simultané. Inconvénient, la 
copie conserve les séquelles de l'original, 
à savoir les fichiers "effacés" et les 
éventuelles dispersions d'un fichier un 
peu partout sur la disquette. 

— La copie logique ou "séquentielle" 
consiste a recopier les divers titres un par 
un sur une disquette préalablement for- 
matée. C'est plus long, mais c'est plus 
"propre". En effet, on peut faire une 
copie sélective ou totale des titres et les 
fichiers "dispersés" se retrouvent alors 
"recompactés". C'est le cas du FILE- 
COPY * . * du CP/M ou COPYFILE ou PIP 
si vous possédez un second drive. Deux 
remarques : les fichiers "cachés" (non 
visibles par CAT ou DIR) ne sont pas 
copiés. Certains logiciels plus perfor- 
mants que FILECOPY exigent que l'ori- 
ginal soit formaté Système. 

Les incompatibilités entre les CP/M 

Même chez AMSTRAD, il existe plu- 
sieurs versions de Systèmes CP/M (ou 
DOS = Disc Operating System) et la 
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compatibilité entre elles est loin d'être 
parfaite ! (Si cela peut vous consoler, 
c'est bien pire encore chez les IBM PC). 
Avec le CPC 464, nous ne disposons que 
du CPM 2.2, tandis que le CPC 61 28 est 
livré avec CPM 2.2 et CPM PLUS. Le 
PCW ne possède que ce dernier. La ver- 
sion "PLUS" est plus étoffée que la 
"2.2", mais le drame vient du fait que 
sa façon d'écrire et de formater soit légè- 
rement différente ; bien qu'il s'agisse 
toujours de 40 pistes en 9 secteurs. 
Un 464 a du mal à lire une disquette 
créée sous CPM PLUS. Le possesseur 
d'un 61 28 en usage généra/ a intérêt à 
adopter le CPM 2.2 et ce, pour pouvoir 
profiter d'échanges avec les possesseurs 
de 464. Réserver le CPM PLUS pour des 
échanges de fichiers ASCII avec des 
PCW ou pour se livrer à des "magouil- 
les du second degré" avec le DOS. 




C'est terminé pour les connaissances 
théoriques, abordons les astuces pour 
mieux assurer nos sauvegardes : 

L'organisation des cassettes 

Pour un début de cassette, il est conseillé 
de démarrer la sauvegarde sur le COL- 
LAGE amorce-bande, en bobinant à la 
main à l'aide d'un corps de stylo, sinon 
l'enregistrement commencera sur cette 
amorce. En revanche, il est dangereux de 
confier ce bobinage au magnétophone 
car, étant très imprécis, la lecture pour- 
rait commencer par le début d'une "éti- 
quette" obsolète avant de lire la bonne... 
Lorsque l'on enregistre plusieurs petits 
programmes indépendants sur une 
même cassette, tout en notant les repè- 
res compteur pour les retrouver, la grave 
erreur est de les mettre immédiatement 
à la suite les uns des autres. Deux rai- 
sons à cela : 

— on ne pourra augmenter la taille d'un 
programme sans effacer le début du sui- 
vant ; 

— le pré-positionnement précis par le 
compteur est long à réaliser. 

Laissez plus de 10 unités de compteur 
entre deux titres et démarrez sur des 
multiples de 10. Exemple, une sauve- 



garde se termine sur "36", faites la sui- 
vante à partir de 50. Ainsi pour rechar- 
ger ce titre, il suffira de se positionner 
"un peu avant 50". Remarquez que lais- 
ser tourner de 45 à 50 prend moins de 
temps que de fignoler un positionne- 
ment. D'autant plus que Jes repères du 
compteur ne sont pas d'une fidélité 
remarquable... 

Ne pensez pas au petit gaspillage que 
cela représente, car de toute façon, vous 
n'auriez pas rempli cette C-60. De 
même, n'utilisez pas la face B : déjà 
qu'un programme sur cassete est long 
à charger, si on y ajoute encore le temps 
d'un rebobinage complet I 
Si vous enregistrez sur un magnéto exté- 
rieur stéréo (CPC 664 et 61 28) pour lire 
sur un 464, il vous faut relier ensemble 
les canaux gauche et droite. Sans cette 
précaution, le signal ne sera que sur la 
voie gauche ; or, le 464 lit les deux pis- 
tes et s'il reste sur la voie droite de la 
musique que vous aviez cru effacer par 
ce SAVE... 

Possesseur d'un 464, vous tapez un long 
programme : bien sûr, vous en faites une 
sauvegarde tous les quarts d'heures au 
cas où... (surtout par temps d'orage). 
Mais il serait absurde de reprendre cha- 
que fois le même début de cassette : 
imaginez une coupure de courant en 
cours de sauvegarde. Que restera-t-il ? 
Rigoureusement rien I 
Deux méthodes au choix : ou bien on a 
deux cassettes utilisées alternativement 
(après rebobinage) ou une seule où l'on 
prend toujours la suite, mais en notant 
chaque fois le repère compteur du 
départ. Le risque est de ne plus savoir où 
est la toute dernière version. Alors plu- 
tôt que de retaper chaque fois SAVE 
"MACHIN", prenez l'HEURE comme 
nom. Ainsi, SAVE "1506" signifiera 
sauvegardé à 1 5 heures 06 minutes ; 
"MACHIN" sera pour la version défini- 
tive. 

L'organisation des disquettes 

Reprenons le problème précédent de sai- 
sie de listing. Là, il faut DEUX disquet- 
tes distinctes. Ne comptez pas trop sur 
les versions BAK à cause de la loi de 
MURPHY (la loi de l'em... maximum) : si 
une coupure survenait lors de la ré- 
écriture du catalogue, on perdrait toute 
la disquette ! Ici encore, prenez l'heure 
comme nom. 

Ne mettez pas un point d'honneur à rem- 
plir complètement vos disquettes, 1 5 
kilo-octets disponibles par face est un 
minimum. Songez que vous serez un jour 
amenés à modifier l'un d'eux et qu'il est 
grotesque d'être bloqué par un "dise 
full" parce que l'on n'avait pas prévu 
l'encombrement du .BAK... 
Sur le carton des boîtiers de disquettes, 
vous notez le contenu de chaque face ; 
mais inscrivez aussi AU CRAYON les 
kilo-octets encore disponibles. Cela sera 
très utile pour savoir sur laquelle vous 
allez loger ce programme de 37 Ko. 



Il est très difficile d'écrire sur le papier 
trop glacé des étiquettes de disquettes, 
surtout les AMSOFT. Pour que le stylo- 
bile ou le crayon "prennent", gommer 
énergiquement ce papier avant d'écrire ; 
ou collez par-dessus une étiquette adhé- 
sive au papier bien mat. Pour faire vos 
étiquettes a l'imprimante voir "CPC" n° 
25 page 62. 

Si vous aimez programmer, réservez- 
vous une disquette spéciale que vous 
nommerez "TRAVAIL". .C'est l'établi sur 
lequel on tape le nouveau programme, où 
il ne sera d'ailleurs qu'en transit, les 
autres titres y sont à demeure car ce sont 
vos programmes d'aide à la programma- 
tion, ainsi que les sous-programmes uti- 
litaires que l'on recharge par MERGE. Le 
gain de temps est alors considérable. 
(Voir du même auteur "PROGRAMMES 
UTILITAIRES POUR AMSTRAD, SORA- 
COM). 

Le CAT sur telle disquette montre une 
vingtaine de titres dont la plupart sont 
des sous-programmes ou des fichiers. 
Comment repérer les quelques "noms de 
lancements" sur lesquels on fait RUN ? 
(Ne vous fiez pas à votre mémoire...). Il 
suffit de les renommer en mettant 
comme premier caractère le signe moins. 
Ainsi, TRUC. BAS deviendra -TRUC. BAS. 
Et comme CAT affiche les titres par ordre 
alphabétique, ils seront regroupés en tête 
de liste. _^a-jU, 




Conclusion 

C'est une évidence de dire que pour être 
un bon automobiliste, il faut avoir assi- 
milé quelques notions de mécanique 
générale, même si elles ne sont que 
superficielles. Il en va de même en micro- 
informatique car il n'y a rien de plus frus- 
trant, démotivant, que de perdre bête- 
ment le fruit de nombreuses heures de 
travail. Pire encore, si on ne sait pas 
pourquoi ! Ces quelques notions vont 
souvent "faire réfléchir avant d'agir", 
mais vous permettront aussi de créer vos 
propres "astuces de sécurité". 
Certaines de mes "explications techni- 
ques" ont été volontairement très sim- 
plifiées, ce qui va encore m'attirer les 
foudres de certains universitaires puris- 
tes... Le but était d'être compris par tous 
ceux qui veulent avoir confiance 
lorsqu'ils tapent un SAVE. 
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PROGRAMMATION 



AVANCEE 



CENTRE DE GRAVITE, 
SPHERE D'ENCOMBREMENT 
COMPATIBILITE AVEC 
AMSTRAD-3D 
GESTION PAR BLOCS 
D'OBJETS. 

l8ème PARTIE 



CAO 



SUR 



MICRO 



CPC 



Jean-Pierre PETIT 



Jean-Pierre PETIT est directeur de recherche au CNRS. Il est 
l'auteur d'un logiciel de CAO de 120 Ko intitulé AMSTRAD 3D, 
assorti d'un livre du même nom, édité par PSI. Le logiciel a été 
délibérément mis dans le domaine public, c'est-à-diro que vous 
pouvez le copier sur une disquette AMSTRAD-CPC en toute 
tranquillité chez un revendeur ou un ami. Le livre est un gros mode 
d'emploi du logiciel, pour non-programmeur. 
Mais ce programme est riche de ficelles de programmation, liées à 
l'imagerie 3D. Dans cette suite d'articles, Jean-Pierre PETIT 
explique au lecteur toutes ses astuces, ce qui lui permettra peut- 
être de construire lui-même son propre programme de CAO. 



• REMARQUE 

Certains lecteurs semblent avoir eu 
des difficultés à se procurer la dis- 
quette AMSTRAD-3D. En plein ac- 
cord avec l'éditeur vous pouvez le 
cas échéant adresser une disquet- 
te AMSTRAD vierge à l'auteur, à l'a- 
dresse suivante : 

Jean-Pierre PETIT - Chemin de la 
Montagnère - 84 Pertuis - Vaucluse 
dans un emballage ad hoc, avec vo- 
tre adresse et un mandat de 50 F 
pour le port. 



INTRODUCTION 

Nous savons maintenant créer des 
objets et à partir de ceux-ci créer 
des images. Nous savons que le 
programme permet de traiter un ob- 
jet de 50 chaînes de 12 segments, 
soit une capacité de 600 seg- 
ments. 



On définira dans cette leçon ce 
qu'on appellera un BLOC, ou en- 
semble d'objets. Celui-ci sera repé- 
ré par un nom de bloc BL$. Dans ce 
fichier bloc les objets composants 
auront pour nom EL$(K) et K sera 

l'indice de l'objet dans le bloc, et va- 
riera de O à E. Ce qui voudra dire 
qu'un bloc contiendra E + 1 objets. 
Mais le fichier bloc contiendra d'au- 
tres caractéristiques de l'objet : 

EL$(K) le nom de l'objet 
CO(K) la couleur de l'objet 
GX(K) Les coordonnées du cen- 
tre de gravité de l'objet 
GY(K) 
GZ(K) 

RE(K) La valeur du rayon de sa 
sphère d'encombrement 

Ce sont des données qui auront 
été calculées une fois pour toutes 
et dont nous ferons un certain usa- 



ge. Ceci va nous amener à modifier 
quelque peu les sections de pro- 
gramme intitulées MOD1 et DES et 
en particulier les sous-programmes 
5000 et 8000 (de chargement et 
de stockage d'objets). Ce sont des 
sections que nous avions définies 
dans les toutes premières leçons et 
je n'avais pas voulu vous embrouil- 
ler l'esprit en introduisant tout de 
go un nom d'objet indicé et différen- 
tes caractéristiques liées à celui-ci 
qu'il m'aurait bien fallu expliquer. 

Ce faisant, nous rendrons le logiciel 
que nous sommes en train d'élabo- 
rer compatible avec les fichiers 
présents sur la disquette AMS- 
TRAD-3D, que certains d'entre 
vous possèdent peut-être déjà. 
Bien sûr, ce que nous avons cons- 
truit n'est peut-être pas aussi com- 
plet et aussi performant qu'AMS- 
TRAD-3D, mais une relation de 
cousinage sera au moins établie. A 
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la fin de cette leçon il vous sera pos- 
sible de charger n'importe quel ob- 
jet présent sur la disquette AMS- 
TRAD-3D et d'en tirer une image 
avec votre propre programme . 

Je suppose que vous avez par ail- 
leurs créé un certain nombre d'ob- 
jets depuis que nous travaillons en- 
semble, avec les programmes que 
nous avons construits, et que vous 
n'aimeriez pas perdre. Nous allons 
donc commencer par écrire un pro- 
gramme qui permette de transfor- 
mer ces fichiers objets, et de les re- 
stocker. 

Pour ce faire vous allez prendre le 
programme de la dernière leçon et 
y intégrer le sous-programme 
44000, en modifiant par ailleurs cer- 
taines lignes des programmes 
5000 et 8000. 

Fidèles à notre principe nous don- 
nerons ci-après un listing complet 
d'un programme capable de fonc- 
tionner par lui-même. On trouvera 
bien entendu la mention des sous- 
programmes déjà créés. 



on aura disposé tout ce qui sera né 
cessaire, non seulement pour cette 
leçon, mais pour les suivantes. 



ETABLIR ENFIN LE LIEN 
AVEC AMSTRAD-3D 

On remarquera qu'on a garni abon- 
damment la ligne 4, de réservation 
de places mémoire. Cette fois-ci, 
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ne gaspillez plus vofre mise ! 
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de combinaisons de jeux 
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le maximum de chance 

de gagner de votre côlé 

DOC + CADEAU TRES UTILE 
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INFORMATIC Applications 
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Figure 1 : Centre de gravité et 
sphère d'encombrement 



CALCUL DU CENTRE DE 

GRAVITE ET DU RAYON 

D'ENCOMBREMENT 

Si nous lançons ce programme et 
que nous chargions un objet, par 
exemple l'objet CUBF que nous 
avions défini dans une leçon précé- 
dente, et si nous restockons cet ob- 
jet (sous-programme 8000) nous 
constatons quelques différences 
avec l'ancien sous-programme. Il 
existe une ligne supplémentaire 



8015 GOSUB 44000 
GX.GY.GZ.RE 



RFM Calcul 



qui active un nouveau sous 
programme. Au moment de l'écritu- 
re des données sur disquette, l'or- 
dre 8025 a également été modifié 

8025 PRINT #9, CO(K), 
GX(K), GY(K), GZ(K), RE(K), 
L :REM, l'objet a (L+1) 
chaînes 

En tête du fichier on trouvera consi- 
gnés cinq nombres CO(K), GX(K), 
GY(K),GZ(K),RE(K). Le premier est 
simplement la couleur de l'objet 
Comme c'est un aspect assez 
secondaire, disons un gadget, 
nous n'expliciterons pas ce point 
pour le moment. Les quatre nom- 



bres suivants sont par contre plus 
intéressants. Ils constituent les co- 
ordonnées du centre de gravité de 
l'objet et la valeur du rayon de sa 
sphère d'encombrement 

Considérons un objet quelconque. 
Si XT(I,J) représente l'abscisse du 
point d'indice J sur la chaîne I, l'abs- 
cisse du centre de gravité sera la va- 
leur moyenne de ces abscisses, 
soit: 



W, j^l) 

L Z, XT 0' J ) 

i= o j=o 

i»L 



X < N ('> + 1 ) 



i=o 

Expressions analogues pour l'or- 
donnée et la cote du centre de 
gravité. 

Le dénominateur n'est autre que le 
nombre total de points de l'objet (il 
y a N(l) + 1 points sur la chaîne d'indi- 
ce I). 

L'écriture programmée de cette ex- 
pression est beaucoup moins rébar- 
bative. Elle correspond aux lignes 
44020 à 44090. 

On opère alors un tri des plus sim- 
ples. On calcule la distance R sépa- 
rant tout point du centre de gravité 
(GX(K), GY(K), GZ(K)) et on retient 
en RE(K) la valeur maximale. On est 
alors assuré que l'objet est entière- 
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ment contenu dans une sphère si- 
tuée au centre de gravité et de 
rayon RE(K) (figure 1). 



En utilisant le programme donné ci- 
après vous pourrez transformer 
tous les objets que vous aurez 
créés en les restockant sous le mê- 
me nom. 

Ceci fait vous donnerez au sous- 
programme 5000 sa forme définiti- 
ve en transformant la ligne 5025 en 

5025 INPUT £ 9, CO(K), GX(K), 
GY(K),GZ(K),RE(K),L 



GESTION PAR BLOCS 
D'OBJETS 

Nous allons maintenant considéra- 
blement démultiplier notre façon de 
travailler. Jusqu'ici notre structure 
donnée se limitait à des objets, dé- 
crits par des ensembles de coor- 
données de points indicés (XT(I.J), 
YT(I,J), ZT(I.J)). I était l'indice de 
chaîne et J l'indice de point sur chaî- 
ne. 

Nous allons maintenant introduire 
des fichiers BLOCS, déjà évoqués 
dans l'introduction. Le plus simple 
est de créer un bloc. Pour ce faire, 
vous allez incorporer l'option : 

e-gestion de blocs d'objets. 

dans la ligne 60. Dans la ligne de 
dispatching 230 elle renverra au 
sous-programme 21000, qui en- 
gendrera aussitôt l'affichage d'un 
sous - menu : 



CREATION DE BLOCS 
D'OBJETS 

a - Créer un bloc d'objets 
b - Charger et lire un fichier btac 
c - Dégraisser un bloc 
d - Détruire un bloc 
e - Copier ensemble standard 
f - Copier un bloc avec ses élé- 
ments 
g - Détruire un bloc + objets 



h - Compacter un bloc 
i - Fusionner des blocs 

Votre choix : 

Dans ce qui va suivre nous ne déve- 
lopperons que les deux premières 
de ces sous-options, mais la signifi- 
cation des suivantes est assez évi- 
dente. L'opération de dégraissage 
consistera à supprimer certains ob- 
jets dans le bloc. Un ensemble stan- 
dard sera un fichier bloc particulier 
qui sera automatiquement appelé 
lorsqu'on active la sous-option 

c - Travailler sur un objet standard 

qui est présente dans 

a -Créer un objet. 

La ligne de dispatching 21150 ne 
renvoie provisoirement que sur les 
deux premières sous-options : 

a-Créer un bloc d'objets 

— ->1000 

b-Charger et lire un fichier-bloc - 

> 2000 

Pour créer un fichier bloc, il faut dis- 
poser d'objets déjà créés, présents 
sur la disquette. Supposons que 
ces objets soient MAISON, BAS- 
SIN, PORTAIL. Nous voulons créer 
un bloc qu'on appellera RESIDEN- 
CE. 

La séquence 1000 matérialise cet- 
te création de bloc BL$ = "RESI- 
DENCE" 

On demande à l'utilisateur le nom- 
bre d'éléments. En 1040 on rétro- 
grade E d'une unité, puisque le 
nombre d'éléments sera en fait 
(E+1), à cause de l'indexage. Suit 
une boucle de saisie d'indice K. 
L'objet est à chaque fois chargé 
pour constituer les fichiers CO(K), 
GX(K), GY(K), GZ(K), RE(K), partie 
intégrante du fichier bloc. Le sous- 
programme 6000 permet de stoc- 
ker le fichier bloc. 

Le sous-programme 2000 matériali- 
se l'opération inverse. On notera 
en 2070 la boucle de temporisation 
dont la durée est indexée sur le 
nombre d'éléments. 



Si vous vous êtes procurée la dis- 
quette AMSTRAD-3D, ce que je 
vous conseille de faire, vous pour- 
rez utiliser votre propre programme 
pour lire un fichier bloc présent sur 
cette disquette, le fichier STAN- 
DARD. Attention, ne faites pas de 
bêtises avec tous ces programmes 
MOD1 qui portent le même nom et 
ces ordres de chaînage. Utilisez 
des copies, de grâce. Avant de fai- 
re la moindre sauvegarde, faites 
LIST 1 pour savoir ce que vous sau- 
vez, sinon vous risquez d'écraser 
un programme avec un autre. 
Vous chargerez STANDARD avec 
la séquence : 

e-Gestion de blocs d'objets 
b-Charger et lire un fichier bloc 
LECTURE BLOC 
Nom du bloc? STANDARD 

Vous verrez apparaître : 

CUBE 

T1 

T2 

fx 

FY 

BASSIN 

PX 

MARCHE 

SX 

FENETRE 

SY 

SZ 

BAC 

TABLE 

CHAISE 

ETAGERE 

dodeca 

Qui représente la liste d'OBJETS 
STANDARDS variés fournis sur la 
disquette. 



POURQUOI MANIPULER 
DES BLOCS ? 

Primo on accroît sensiblement la ca- 
pacité segmentaire. Dans la ligne 4, 
de dimensionnement, on voit 
qu'on a prévu de manipuler jusqu'à 
30 objets pour chaque bloc, ce qui 
donne une capacité, toute théori- 
que, de 

30 x 50 x 1 2 = 18000 segments ! 
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Précisons que la disquette AMS- 
TRAD est totalement incapable 
d'héberger de telles données. On 
pourrait alors se demander : pour- 
quoi taire, dans ces conditions ? 
On verra beaucoup plus loin que la 
gestion par bloc trouve toute sa for- 
ce lorsqu'on veut créer des images. 
On pourra par exemple analyser 
chaque objet et voir si sa sphère 
d'encombrement, c'est-à-dire la bul- 
le qui le contient, est visible à tra- 
vers la fenêtre de l'écran. Si cette 
bulle (dont l'image sera un cercle) 
est hors-champ, on laissera pure- 
ment et simplement tomber cet ob- 
jet. D'où un gain de temps absolu- 
ment considérable. 
Le fait de traiter des objets selon un 
bloc est essentiel pour le problème 
de l'élimination des parties ca- 
chées. C'est une chose qu'on abor- 
dera également plus tard. Enfin 
cela conserve aux ensembles mani- 
pulés un certain caractère modulai- 
re, en les rendant "démontables" à 
tout moment, ce qui ne serait plus 
le cas s'ils étaient intégrés selon un 
fichier objet unique (Sous option : i- 
Compacter un bloc).. 



230 ON C GOSUB 64000, 64000, 
64000, 5000, 60000, 60000, 
60000, 60000, 60000, 60000, 
60000, 27000, 60000 

par: 

230 ON C GOSUB 64000, 64000, ' 
64000, 5000, 64000, 60000, 
60000, 60000, 60000, 60000, 
60000, 27000, 60000 

e est la cinquième lettre de Kalpha- 
bet. Maintenant le choix de cette 
option e-Gestion de blocs d'objets 
enverra à la ligne 64000, laquelle 
entraînera le chaînage sur MOD1 . 

Il nous faudra ensuite une séquen- 
ce de chargement de bloc. Or nous 
voyons que les lignes 7000-7999 
sont déjà occupées dans DES par 
le calcul des paramètres de vision. 
Qu'à cela ne tienne, nous logerons 
cette séquence en 28000-28999. 
Pour ce faire stockez DES dont les 
lignes 60 et 230 viennent d'être mo- 
difiées. Chargez MOD1. Faites: 

DELETE 1-6999 
DELETE 8000-65535 



Faites ensuite MERGE"DES 
Votre opération de couture est 
achevée et vous avez intégré dans 
votre programme cette séquence 
28000-28999. 

Une légère modification dans la sé- 
quence 5000-5999, de charge- 
ment d'objet : 



5001 Fl=0 
tracé. 



REM FLAG de non 



Ce flag trouvera sa justification plus 
tard. Lorsqu'il est armé à 1 l'objet se 
trouve chargé, mais non tracé (ceci 
désamorce la ligne) 

5065 IF FI = THEN GOSUB 
15000: REM Tracer 

La présence insolite de ce FLAG se- 
ra expliquée dans une leçon ulté- 
rieure, consacrée à la réalisation de 
PLANS TROIES-VUES. 



On écrira de plus : 

5025 INPUT £ 9, CO(K), 
GY(K),GZ(K), RE(K), L 
L'objet a (L+1 ) chaînes. 



GX(K), 
: REM 



DESSIN DE BLOCS OU 
D'ENSEMBLES D'OBJETS 

Nous allons adapter notre program- 
me de création d'images à cette 
idée de gestion de blocs d'objets. 
Vous pouvez évidemment taper ce 
nouveau programme DES de A à Z, 
mais comme il faut toujours éviter 
de se perdre dans un travail inutile, 
nous allons indiquer comment modi- 
fier le listing donné dans la leçon 4 
pour parvenir au même résultat. 
Dans ce qui suivra les modifications 
à apporter au programme précé- 
dent sont indiquées en caractères 
gras. 

Nous allons d'abord intégrer l'op- 
tion e (gestion de blocs d'objets) 
dans la ligne 60. Mais nous ne gére- 
rons pas cette option dans DES. 
Ceci sera le fait de MOD1, donc 
nous créerons l'ordre de chaînage 
ad hoc pour renvoyer à MOD1 dans 
la ligne de dispatching. Ceci revient 
a remplacer la ligne 



Il reste la séquence 7000-7999, de 
chargement de bloc. Nous allons la 
renuméroter en faisant RENUM 
9000. Mofifiez la dernière ligne 
pour avoir un 28999 RETURN 



Continuons ces modifications du 
programme DES. Nous savons que 
quand nous voulons créer une ima- 
ge on nous pose deux volées de 
questions : 



Cheminée 




Bassin 



Figure 2 : Représentation d'un bloc d'objets 
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et 



REPRESENTER UN OBJET 

a-Objet en mémoire 
b-Dessin par éléments 
c-Dessin par bloc 



a-Saisie point de vue au clavier 
b-Saisie écran 



La saisie écran restera une sous-op- 
tion "muette" pour le moment. 
Nous nous en occuperons plus 
tard. Aujourd'hui nous allons nous 
occuper du dessin par éléments et 
du dessin par bloc. Dans l'ancien 
programme, la ligne 27360 ren- 
voyait exclusivement au sous- 
programme 12000, qui réalisait le 
tracé de l'objet supposé être déjà 
présent en mémoire. Nous allons la 
remplacer par la ligne de dispat- 
ching : 

27360 ON CD GOSUB 12000, 
11000, 10000 : REM Type de 
dessin 

par: 




27360 IF CD = 2 THEN GOSUB 

18000 : REM Saisie éléments. 

27370 IF CD = 3 THEN GOSUB 

28000 : REM Charger bloc 

27380 ON C GOSUB 12000, 

11000,10000 

27390 SOUND 1,50 : LOCATE 1,1 

: PRINT "Pressez <Return>" : 

GOSUB 65020 : REM Signale la fin 

du tracé. 

27998 CD = 0: 

27999 RETURN 

Le choix CD = 2 correspond à un 
dessin de plusieurs objets arbitraire- 
ment choisis (n'appartenant pas né- 
cessairement à un bloc). La séquen- 
ce 18000 permet la saisie des-dits 
éléments. 

Le choix CD = 3 correspond au des- 
sin d'un bloc. On appellera donc la 
routine de chargement d'un bloc 
BL$. 

La ligne 27380 correspond à un dis- 
patching vers des sous- 
programmes de tracés divers. Le 
sous-programme 12000 est connu, 
mais nous avons ajouté un appel à 
un sous-programme 62000, qui tra- 
ce un cadre. Les sous-programmes 
11000 et 10000 sont d'une lecture 
en principe évidente. 

Il y aura donc un court message so- 
nore en fin de tracé, avec arrêt du 
programme, pour pouvoir contem- 
pler l'image à son aise. 




1 REM M0D1 7 Mai 87 (gestion de blocs, programme Pli) >VF 

2 IF FD=1 THEN 230 >LK 

3 FD=1: L = - 1:REM Initialiser L (L+l chaines dans obj >AX 
et ) 

4 DIM XT(49,12),YT(49,12),ZT(49,12),N(49),XE(12),YE<12) >NF 
:REM ETC.... 

7 GOSUB 24000: REM Choix des couleurs >EP 

10 CLS >MB 

15 PRINT"MENU PRINCIPAL": PRINT >BH 

20 PRINT"a-Creer un objet" >AE 

30 PRINT'b-Completer un objet" >GJ 

40 PRINT"c-Stocker un objet" >DX 

50 PRINT"d-Charger un objet" >DQ 

60 PRINT"e-Gestion de blocs d'objets":PRINT"f-":PRINT"g >DV 



COMMENT DESSINER UN 

BLOC OU UN ENSEMBLE 

D'OBJETS ? 

Supposons que vous ayiez créé 
des objets MAISON, CHEMINEE, 
BASSIN, pylône. Bien sûr, vous de- 
vrez avoir placé ces objets, en X, Y, 
Z, de telle manière qu'ils ne se che- 
vauchent pas les uns les autres. 
Vous pouvez soit les intégrer dans 
un bloc, soit les considérer comme 
des éléments. Après avoir défini le 
point de vue, vous obtiendrez aisé- 
ment une vue de l'ensemble, com- 
meen figure 2. 

CONCLUSION 

Que vous ayiez directement inclus 
ces éléments du modeleur dans le 
travail déjà accumulé dans les le- 
çons précédentes, ou que vous 
ayiez réalisé l'union des deux à l'ai- 
de d'un MERGE (attention, si les 
programmes ont deux lignes en 
commun, celles du second s'impo- 
seront comme prioritaires. Il faut 
donc charger d'abord l'ancienne 
version, puis faire agir l'instruction 
MERGE sur la seconde), vous ob- 
tiendrez un ensemble de 17+6 =19 
K. Dans la leçon qui suivra nous ver- 
rons comment créer une section 
programme fort utile : VOIR, qui 
donne les images avec une défini- 
tion automatique du point de vue. 

-":PRINT"h-":PRINT"i-":PRINT"j-":PRINT"k-" 

70 PRINT "1-Creer une inage" >CH 

80 PRINT"«i-":PRINT"n-":PRINT"o-":PRINT"p-" >PQ 

180 PRINT"q-t|uitter" >UK 

195 IF EL* <> "" THEN LOCATE 22,21:PRINT"0bjet résident >KC 

":L0CATE 22, 23: PRINT EL* 

197 IF LO-1 THEN LOCATE 31,23:PRINT L+l; u ch." >PT 

200 GOSUB 65000: REM Saisie caractère >EU 

210 IF C=17 THEN END >NL 

220 IF C = 12 THEN CHAIN"P12 >UJ 

230 ON C GOSUB 9000,9010,8000,5000,21000: REM etc.... >UL 



999 !ERA,"*.bak":G0T0 10:REM Boucle MENU 

1000 REM CREER UN BLOC 

1010 CLS : PRINTCREER BLOC D OBJETS": PRINT 

1020 INPUT"Nom du bloc ";BL* 

1030 INPUT"Nonbre d'éléments ";E 

1040 E=E-1 

1050 FOR K=0 T0 E 

1060 PRINT"0bjet numéro ";K+1 

1070 INPUT EL* (K): GOSUB 5020: REM Charger objet 



>KB 
>QB 
>PC 
>AF 
>GY 
>JA 
>DF 
>CA 
>8M 



-21. 



1090 NEaT K 


>VH 


1100 6ÛSUB 6000:REM Stockage fichier-bloc 


m 


199? RETURN 


>HB 


2000 REh LECTURE BLOC 


>QU 


2010 CLS : PRINT'LECTURE BLOC":PRINT 


/FA 


2020 INPUT "Non du bloc ";BL*:G0SUB 7000:REM Charger Blc 


>FM 


c 

2035 PRINT"Bloc ":BL$:PRINT 


ï'C 


2040 FOR K=0 TQ E 


DF 


2050 PRINT EL$(K) 


;L6 


20i0 NEXT K 


/VF 


2»70 FOR TT=0 TQ (E+l)*200 : NEaT TT:REM Temporisation 


>YC 


2999 RETURN 


/mC 


5000 REM Chargement objet 


, vz 


5010 INPUT "Nom de l'objet ";EL$<K):EL*=£L*(K) 


/UD 


5020 OPENIN EL**K) 


/MB 


5025 INPUT#9.L:REM L'objet a (L+U chaînes 


>PV 


5030 FOR 1=0 TO L : REh Pour toutes ies chaînes allant 


m 


de a L 




5040 INPUT #9.N(I): REM Nombre de segments sur chaîne 


>XB 


5050 FOR J=0 TO N(I):REM Pour tous les Points de ia cha 


>CN 


me d'indice I 




5060 INPUT #9,XT(I,J).ïTa.J/.ZT(I.J; 


>FD 


5070 NEXT J:NEXT I 


/MU 


50B0 CLOSEIN 


>MD 


5999 RETURN 


>HF 


6000 REM ST0CKA6E BLOC 


>RF 


6005 PRINT" Je stocke le bloc ":B(_$ 


/HD 


6010 OPENOUT BL$ 


/LD 


6020 PRINT #9,E 


>YS 


6030 FOR K=0 TO E 


>DJ 


i,040 PRINT #9,EL$(K; 


/NX 


6050 PRINT #9,C0(K) 


>NN 


6060 PRINT #9.6xtK* 


>NB 


6070 PRINT #9,GY(K; 


>NF 


6080 PRINT #9,BZïKi 


>NH 


6090 PRINT #9,RE(K) 


>NY 


6100 NEXT K 


>VE 


6110 CLOSEOUT 


>YJ 


699? RETURN 


>HG 


7000 REM CHARGEMENT FICHIER BLOC 


/BY 


7005 PRINT"Je charge le bloc ";BL* 


>HW 


7O10 OPENIN BL$ 


,>BJ 


7020 INPUT #9,E 


>ZA 


7030 FOR K=0 TQ E 


>DK 


7040 INPUT #9,EL*(K) 


m 


7050 INPUT #9,C0(K) 


>N7 


7060 INPUT #9,GX(K) 


>NH 


7070 INPUT #9,6Y(K) 


>NK 


7O80 INPUT #9,6Z(K) 


m 


7090 INPUT #9,RE(K) 


>NC 


7100 NEXT K 


>VF 


7110 CLOSEIN 


>LK 


7999 RETURN 


>HH 


8000 REM STOCKAGE OBJET 


>TQ 


8010 INPUT"Nom de l'objet ";EL$(K):EL$=EL$(K) 


>UG 


8015 GOSUB 44000:REM Calcul de GX,GY,GZ,RE 


>KY 


8020 OPENOUT EL$(K) 


>NW 



8025 PRINT #9.CQ(K),GX(K).GY(Ki,6Z(k 

ET A (L+ll CHAIN 

8030 FOR 1=0 TO L: REM Pour toutes les chaînes ailant a 

e a L 

8040 PRINT #9 . N ( I > : REli Nombre de segments sur chaîne 

8050 FOR J=0 TO N(I)i REM Pour tous les Points ae la ch 

aine d indice I 

8060 PRINT #9,XT(I,J).vT(I, J),ZT(1,J) 

8070 NEXT J:NEXT I 

8080 CLOSEOUT 

8999 RETURN 

9000 REM CREER UN OBJET 
9999 RETURN 

14000 REM INCORPORER LA CHAINE A L'OBJET 

14999 RETURN 

18000 REM DISCRIMINER ARCTAN6ENTE 

18999 RETURN 

21000 REM GESTION DE BLÛCS D Ùb JETS 

21010 CLS :PRINT"6ESTION DE BLOCS D'OBJETS": PRINT 

21020 PRINT"a-Creer un bioc d objets" 

21030 PRINT"b-Charger et lire un fichier bioc" 

21040 PRINT"c-Begraisser un bloc" 

21050 PRINT"d-Detruire un bioc" 

21066 PRINT"e-Copier ensemble standard" 

21070 PRINT"+-Copier un bloc et ses éléments - ' 

21080 PRINT"g-Detruire bioc+objets" 

21090 PRINT"h-Compacter bloc" 

21100 PRINT'' î -Fusionner des blocs" 

21110 GOSUB 65000 

21120 IF ASC(C$)=13 THEN 21999 

21130 IF C>7 OR C s THEN 21000 

21140 IF ASC(C$)=13 THEN 21999 

21150 ON C GOSUB 1000.2000: REM ETC.... 

21999 RETURN 

24000 REM CHOIX DES COULEURS 

24999 RETURN 

25000 REM TRACE EN PLAN DE L'OBJET EXISTANT 

25999 RETURN 

26000 REM CREER DES CHAINES 
26999 RETURN 

32000 REM CREER UN CERCLE 

32999 RETURN 

33000 REM CREER ARC DE CERCLE 

33999 RETURN 

34000 REM CREATION OBJET DE REVOLUTION 

34999 RETURN 

35000 REM OBJET D'AXE OX 

35999 RETURN 

36000 REM OBJET D'AXE ÛY 

36999 RETURN 

37000 REM OBJET D'AXE OZ 
37999 RETURN 

44000 REM CALCUL DE GX,GY,GZ et de RE 

44010 GX=0:GY=0:GZ=0:N=0:RE(K)=0:REM Initialisations 

44020 FOR 1=0 TO L: FOR J=0 TON(I) 

44025 N=N+1:REM Compter les points 

44030 GX=GX+XT(I,J) 

44040 6Y=GY+YT(I,J) 



,RE(K;.L:REM L OBJ ,>WR 



>DY 



>DR 

>FF 
,MX 
>Z6 
>HJ 
>RT 
>HK 
>BX 
/PE 
>DQ 
>PJ 
;wJ 
>XQ 
,>NC 
/CH 
/JF 
/FZ 
,'UA 
>BP 
/MT 
/DA 
>LN 
/LR 
>WE 
>VT 
>Wb 
>DZ 
>PC 
>XH 
>PF 
/VF 
>PG 

:>vg 

>PH 
>UK 
>PE 
>WR 
>PF 
>HC 
>PG 
>LO 
>PH 
>LR 
>PJ 
>LT 
>PK 
>DN 
>AG 
>ZD 
>DQ 
>PB 
>PF 
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4405Ô 6Z=6Z+ZT(I,J) 

44060 NEXT J:NEXT I 

44070 6X(K)=GX/N 

44080 6Y(K)=GY/N 

44090 GZ(K)=GZ/N 

44095 REM TRI pour extraire Rmax = RE 

44100 FOR 1=0 TO L:FOR J=0 TO N(I) 

44110 R=SQR ((XT<I,J)-GX<K>)*(XT(I,J)-GX(K))+(YT(I,Ji-G 

Y(K))*(YT(I,J)-GY(K!)+(ZT(I,J)-GZ(K))#(ZT(I,J)-GZ(K))) 

44120 IF RE(KKR THEN RE(KS=R 

44130" NEXT J:NEXT I 

44999 RETURN 

540O0 REM CREER UN PRISME 

54999 RETURN 

60000 REM DEFINITION DU TYPE DE SAISIE DE CHAINE PLANE 

60999 RETURN 

61000 REM SAISIE ECRAN 
61999 RETURN 

65000 REM Saisie caractère 

65010 PRINT:PRINT" Votre choix :" 

65020 C$=INKEY$:IF C$="" THEN 65026 

65030 C=ASC(C$) 

65040 IF C>96 THEN C=C-96:G0T0 65535 

65050 IF C<96 THEN C=C-64 

65535 RETURN 




1 REM M0D1 7 Mai 87 (gestion de blocs, programme PUBIS 
i 

2 IF FD=1 THEN 230 

3 FD=1: L = - 1:REM Initial iser L (L+l chaînes dans obj 
et ) 

4 DIM XT(49,12),YT(49,12),ZT(49,12),N(49),XE(12),YE(12) 
:REM ETC.... 

7 GOSUB 24000:REM Choix des couleurs 

10 CLS 

15 PRINT"MENU PRINCIPAL":PRINT 

20 PRINT"a-Creer un objet" 

30 PRINT"b-Co(iipleter un objet" 

40 PRINT"c-Stocker un objet" 

50 PRINT"d-Charger un objet" 

60 PRINT"e-Gestion de blocs d objets" :PRINT'4-":PRINT"g 

-":PRINT"h-":PRINT"i-":PRINT"j-":PRINT"k-" 

70 PRINT "1-Creer une image" 

m PRINT"m-":PRINT"n-":PRINT"o-":PRINT"p-" 

180 PRINT"g-Quitter" 

195 IF EL* <> "" THEN LOCATE 22,21 :PRINT"0b jet résident 

":L0CATE 22,23:PRINT EL$ 

197 IF LO-1 THEN LOCATE 31,23:PRINT L+l;" ch." 



) 


PK i 


> 200 GOSUB 65000: REM Saisie caractère 


>EU 


>NG 


210 IF C=17 THEN END 


>NL 


>LZ 


220 IF C = 12 THEN CHAINT12 


>UJ 


>LC 


230 ON C GOSUB 9000,9010,8000,5000,21000: REM etc.... 


>UL 


>LF 






>ED 


999 !ERA,"*.bak":GOT0 10:REM Boucle MENU 


>KB 


;ZP 


1000 REM CRÉER UN BLOC 


>QB 


>HJ 


1010 CLS : PRINT'TREER BLOC D'OBJETS": PRINT 


>PC 




1020 INPUT"Noi» du bloc ";BL* 


>AF 


>WJ 


1030 INPUT"Nombre d éléments ";E 


>GY 


>NE 


1040 E=E-1 


>JA 


>PH 


1050 FOR K=0 TO E 


>DF 


>UB 


1060 PRINT"Objet numéro ";K+1 


>CA 


:>pj 


1070 INPUT EL*(K):G0SUB 5020:REM Charger objet 


>0M 


>YT 


1090 NEXT K 


>VH 




1100 GOSUB 6000: REM Stockage tichier-bloc 


>KY 


>PF 


1999 RETURN 


>HB 


>RC 


2000 REM LECTURE BLOC 


/OU 


>PG 


2010 CLS : PRINT"LECTURE BLOC": PRINT 


>FA 


>VB 
>FQ 


2020 INPUT"Nom du bloc ";BL*:G0SUB 7«00:REM Charger Blo >FM 


>AH 


C 

2035 PRINT"Bloc ";BL$: PRINT 


>YC 


>XF 


2040 FOR K=0 TO E 


>DF 


>CQ 


2050 PRINT EL*(K) 


>LB 


>RU 


2060 NEXT K 


>VF 


>NG 


2070 FOR TT=0 TO (E+l)*200 : NEXT TT:REM Temporisation 


>YC 




2999 RETURN 


>HC 




5000 REM Chargement objet 


>VZ 




5010 INPUT"Nom de r objet ";EL*(Ki:EL*=EL*(K) 


;>UD 






5020 OPENIN EL$(K) 


>MB 






5025 INPUT#9,C0(K),GX(K),GY(K),6Z(K),RE(K),L:REM L objf 


>VH 






t a (L+l) chaînes 








5030 FOR 1=0 TO L : REM Pour toutes les chaînes allant 


>DH 






de a L 








5040 INPUT #9,N(I): REM Nombre de segments sur chaîne 


>XB 




5050 FOR J=0 TO NdhREM Pour tous les points de la chc 


/CN 


>ZR 


ine d indice I 






5060 INPUT #9,XTiI,J),YT(I,J),ZT(I,J) 


>FD 


>LK 


5070 NEXT J:NEXT I 


>MU 


>AX 


5080 CLOSEIN 


>MD 




5999 RETURN 


>HF 


>NF 


6000 REM STOCKAGE BLOC 


>RF 




6i)05 PRINT" Je stocke le bloc ";BL* 


>HD 


>EP 


6010 OPENOUT BL$ 


;>LD 


>MB 


6020 PRINT #9,E 


>YG 


>BH 


6O30 FOR K=0 TO E 


>DJ 


>AE 


6040 PRINT #9,EL$(K> 


m 


>GJ 


6050 PRINT #9,C0(K) 


>NN 


>DX 


6060 PRINT #9,GX(K) 


>ND 


>DQ 


6070 PRINT #9,6Y(K) 


>NF 


>DV 


6080 PRINT #9,GZ(K> 


>NH 




6090 PRINT #9,RE(K) 


>NY 


>CW 


6100 NEXT K 


>VE 


>PQ 


6110 CLOSEOUT 


>YJ 


>UK 


6999 RETURN 


>HG 


>KC 


7000 REM CHARGEMENT FICHIER BLOC 


>BY 




70O5 PRINT"Je charge le bloc ";BL* 


>HM 


> 


PT i 


► 7010 OPENIN BL* 


>BJ 
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7020 INPUT #9,E /ZA 

7030 FOR K=6 TÛ E >DK 

7040 INPUT »9,EL*(K) >NB 

7Ô5Ô INPUT »9,C0(K) NT 

7060 INPUT #9,6X(K1 M 

7070 INPUT #9,6) ik: NK 

7080 INPUT i9,6Z(K! Nh 

7090 INPUT #9.REiK) /NC 

7100 NEXT K VF 

7H0 CLÛSEIN >LK 

7999 RETURN /HH 

8t»00 REM STOCKAGE OBJET TQ 

8010 INPUT"Nom de l'objet ";EL$(K):EL$»EL$(Ki ,UG 

8015 60SUE 44000:REM Calcul de 6X.6ï,GZ,R£ >KV 

6020 OPENQUT EL*(K) >NH 
8025 PRINT »9,C0(K),6X(K),6Y{K).6ZiK),RE(K),L:RE« L OBj MF 
ET A (L+l; CHAIN 

8030 FOR 1=0 TQ L: REM Pour toutes les chaînes allant d >DV 
e a L 

8040 PRINT #?,N(I):REM Nombre de segments sur chaine //,W 
8050 FOR J=0 TO Nil): REM Pour tous ies points de la en -DR 
aine d'indice I 

S060 PRINT #9,XTU,J),YT(I, J1,ZT(I,J) FF 

8070 NEXT J:NEXT I >HX 

8060 CLOSEOUT >Z6 

6999 RETURN HJ 

'OOy REM CREER UN OBJET FT 

9999 RETURN M 

liOOO REM INCORPORER LA CHAINE A L OBJET ,-BX 

14999 RETURN >PE 

18000 REM DISCRIMINER ARCTANGENTE >DQ 

18999 RETURN >PJ 

21000 REM GESTION DE BLOCS D OBJETS >MJ 

21010 CL5 :PRINT"GE5TI0N DE BLOCS D 0BJET5":PRINT >XQ 

21020 PRINT"a-Creer un bïoe d objets" -NC 

21030 PRINFb-Charger et lire un fichier bloc" >CH 

21040 PRINT"c-Degraisser un bloc" , : JF 

21050 PRINT"d-Detruire un bloc" ,FZ 

21060 PRINT"e-Copier ensemble standard" ;UA 

21070 PR I NT "+ -Copier un bioc et ses éléments" >BP 

21080 PRINT"g-Detruire bloc+objets" >MT 

21090 PRINT"h-Compacter bloc" ,-DA 

21100 PRINT" i-Fusionner des blocs" ;LN 

21110 50SUB 65000 >LR 

21120 IF ASC(C$)=13 THEN 21999 >WE 

21130 IF C/7 OR C < THEN 21000 ;VT 

21140 IF ASC<C$)=13 THEN 21999 >W6 

21150 ON C GOSUB 1000, 2000: REM ETC.... >DZ 

21999 RETURN /PC 

24000 REM CHOIX DES COULEURS >XH 

24999 RETURN >PF 

25000 REM TRACE EN PLAN DE L'OBJET EXISTANT /VF 
25999 RETURN >FG 
2ô0O0 REM CREER DES CHAINES /VG 
26999 RETURN >PH 
32000 REM CREER UN CERCLE >UK 

32999 RETURN >PE 

33000 REM CREER ARC DE CERCLE >WR 



iai isation; 



33999 RETUFN 

34000 REM CREATION OBJET DE REVOLUTION 

34999 RETURN 

35000 REM OBJET D AxE ÛX 

35999 RETURN 

36000 REM OBJET D AXE Oï 

36999 RETURN 

37000 REM OBJET D AxE GZ 
37999 RETURN 

44Ô60 REM CALCUL DE Gx.bï.bZ et ae RE 
44010 BX=0:BY=0:GZ=0:N=0:RE(K)=0sREM Imi 
44020 FOR 1=0 TO L: FUR J==j) TO Nil; 
44025 N=N+i:REM Compter ies points 
44030 BX=GX+XT(I,J) 
44040 BY=6Y+YT(I,J) 
44050 6Z=BZ+ZT(I,J) 
44060 NEXT JrNEXT I 
44070 GX(K)=bX/N 
44080 6¥(K)=6Y/N 
44090 6Z(K)=6Z/N 

44095 REM TRI pour extraire Rma;; = RE 
44100 FOR 1=0 TO L:F0R J=0 TQ N(I) 
44110 R=5QR i(XT(I,J)-6X(K))*(XT(I,J)-BX(K; 
Y(K)»#<YT(I,J)-BY(K))+(ZT(I,J}-SZ(K))*(ZT(1 
44120 IF REiKKR THEN RE<K;=R 

44130 NEXT J.-NEXT I 

44999 RETURN 

54000 REM CREER UN PRISME 

54999 RETURN 

6O000 REM DEFINITION DU TYPE DE SAISIE DE CHAINE PLANE 

60999 RETURN 

61000 REM SAISIE ECRAN 
61999 RETURN 

65000 REM Saisie caractère 

65010 PRINT:PRINT"Votre choix : " 

65020 C$=INKEY*:IF C*= '" THEN &5020 

65030 C=ASC(C$;' 

65040 IF C>96 THEN C=C-96:G0T0 65535 

65050 IF C-:96 THEN C=C-64 

65535 RETURN 



!.)) + (Y1 

(I.Ji-6 



I,Jj 
Z(K)) 



PF 

HC 
Pb 
>LQ 
>Ph 

;LF 

fi 

lî 
>PK 

L'i'i 

Ab 
. ZD 

DQ 
. FB 

PF 
>Pfc 
►NB 

.lC 
>lf 
/Eu 
>ZP 
>HJ 

;WJ 
/NE 
>PH 
>UB 
>PJ 
, YT 

;PF 
>RC 
/PB 
>VB 
>F0 
/AH 
. : XF 
>CQ 
>RU 
>NG 



Listing 3 



1 REM DES 14 Mai 87 ( Programme P12 i >BK 

2 IF FD=1 THEN 230 >LK 
5 SOUND 1.20: CLS:PRINT"Pas d'accès direct a DES":PRINT >MD 
:PRINT"Je vous renvois sur M0D1...":RUN"P11BIS 

10 CLS >MB 
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15 PRINT-MENU PRINCIPAL" :PRINT 

26 PRINT "a-Creer un objet" 

36 PRINT"b-Completer un objet" 

46 PRINT'c-Stocker un objet" 

50 PRINT"d-Charger un objet" 

60 PRINT"e-Gerer un bioc d objets":PRINT"t-":PRINT"g-": 

PRINT"h-":PRINPi-":PRINT".j-":PRINT"k-" 

70 PRINT "1-Creer une image" 

80 PRINT"m-":PRINT"n-":PRINT"o-":PRINT"p-" 

1BÔ PRINTVtjuitter" 

195 IP EL* <> "" THEN LÛCATE 22.21:PRINT ! '0bjet résident 

":L0CATE 22,23:PRINT ELI 

197 IF LO-i THEN LOCATE 3i,23:FRINT L+I:" en." 

198 LOCATE 1,22 

200 G0SUB 65000: REM Saisie caractère 
210 IF C=17 THEN END 
220 IF C<1 OR D17 THEN 10 
225 IF C = 16 THEN GOSUB 17000: GOTO 10 
230 ON C GOSUB 64000, &4000, 64000, 5000, 64000, û0000,ô00 
00 , 60000 , 60000 , 66666 , 60000 , 27000 , 60000 
240 !ERA,"*.BAK" 
999 SOTO 10 

5000 REM Chargement objet 

5001 FI=8 : REM FLAG de non trace 
5010 INPUT "Nom de l'objet ";EL*(K>:EL$=EL*<K) 
5020 QPENIN EL*(K) 

5025 INPUT#9,CÛ(k).6Xik),ûï Uu ,GZ(kJ,REU : J ,L:REM L'obje 
t a (L+l) chaînes 

5030 FOR 1=0 TQ L : REM Pour toutes les cnaines allant 
de a L 

5040 INPUT #9,N(I): REM Nombre ae segments sur chaîne 
5050 FOR J=0 TO N (I ) : REM Pour tous les points ae la cr,a 
ine d indice I 

5060 INPUT #9,XTU,J),YT(I,J),ZT(I,J) 
5065 IF FI=0 THEN GOSUB 15000: REM Tracer 
5070 NEXT J:NEXT I 
5080 CLOSE IN 
5999 RETURN 

7000 REM CALCUL PARAMETRES VISION 
7090 CX = X6 - XM : CY = Y6 - YM : CZ = ZG - ZM 
7100 DD = SQR (CX*CX + CY*CY ! 

7110 IF DD = AND CZ > THEN TE = : kl = PI / 2 : 6 
0T0 7210 

7120 IF DD V = AND CZ 
0T0 7210 

713Ô kl = ATN (CZ/DD) 
7140 IF CX = AND CY 
7150 IF CX = AND CY 
7160 TE = ATN ICY/CX) 
7170 IF CX < AND CY 



THEN TE = : Kl =-PI 



THEN TE = PI/2 : GOTO 
O THEN TE =-PI/2 : GOTO 



no 



THEN TE = PI + TE 
THEN TE = PI + TE 
O THEN TE = PI 
THEN TE = - PI/2 



7180 IF CX < AND CY 

7190 IF CX < AND CY 

7200 IF CX = AND CY 

7210 REM 

7220 REM 

7230 CT = COS (TE) : ST = SIN (TE) 

7240 CK = COS (Kl) : Sk = SIN (Kl) 

7250 XU = Ck*CT : YU = Ck*ST : ZU=Sk 



>BH ♦ 72fcO XV s - ST : YV = CT s ZV = 6 /UM 

,>AE 7270 XW = - Sk*CT : YW - - SK*ST : ZW = CK >CC 

>GJ 7999 RETURN >HH 

;DX 10000 REM dessin par bioc j> 

>DQ 10005 FI=0 : REM FLAG trace ;UW 

>XP IOOiO CL5:PRINT"DESSIN DU BLOC":PRINT >JC 

10040 FOR k = TO E >LC 

>CW 10050 PRINT EL$(K) mi 

FQ 10055 NEXT k >BG 

>UK 10060 FOR TT =0 TO (E+i)*500 : NEXT TT:CLS >6A 

;KC 1O065 GOSUB 62000: REM tracer cadre BE 

10505 FOR K = TO E ,>LJ 

>PT 10510 GOSUB 5020:REM Charger et tracer ,>Fï 

>YA 10520 NEXT k >BD 

;-EU 10999 RETURN rr 

>NL 11000 REM DESSIN PAR ELEMENTS >YQ 

>RL H075 GOSUB &2000 ?Li 

>CA 11100 FOR k=0 TO E >LQ 

VR 11110 GOSUB 5020:REM Charger et tracer >FV 

11120 NEXT K >BA 

>LF 11999 RETURN PB 

>UE 12000 REM Objet déjà présent en mémoire HD 

,>VZ 12005 IF L=-l THEN CLS:PRINT"Pas d'objet en mémoire, en t l 

;ZC , farceur ' " : SOUND 1,50 :FOR TT=1 TO 1000: NEXT TT : GO 

,>UD TD 10 

;>MB 12010 GOSUB 62000: REM tracer cadre >BW 

;vh 12020 FOR I = TO L : FOR J = TO Nu):REM POUR TOUTE .-bu 

S LES CHAINES ET TOUS LES POINTS DE CES CHAINES 

>DH 12030 GOSUB 15000:REM TRACE IMAGE ECRAN >GA 

12040 NEXT J:NEXT I ,NZ 

>XB 12999 RETURN >PC 

>CN 15000 REM Caicul et trace image >ZC 

15Ô4Ô XL=XT(I,J)-XM >PP 

;FD 15050 YL=YT(I.J)-YM PU 

/SX 1506Ô ZL=ZT(I,J)-ZM >PY 

/MU 15090 XA=XL*XU+YL*YU+ZL*ZU : - 

>HD 15100 YA=XL*XV+Y'L*YV+ZL*ZV 

,>HF 15110 ZA=XL*XW+YL*YW+ZL*ZW «\ 

/CD 15121 IF XA=0 AND YA=0 AND ZA=0 THEN ZA=0.001 >KJ 

?EV 15122 RO = SQR(YA*YA+ZA»ZA) >VF 

?VF 15125 IF XA=0 THEN B=90:G0T0 15127 /AT 

>UW 15126 B=ATN(RQ/XA):B=B*166/PI >YD 

15127 IF XA<0 THEN B=B+180 >Tk 

>VJ 15130 IF YA=0 AND ZA=0 THEN A=90:GOTO 15180 >JB 

15140 IF ZA=0 AND YA >0 THEN A=-96:6ÛT0 15186 /KN 

>NJ 15150 IF ZA=0 AND YA'.O THEN A=90:G0T0 15180 >JC 

>HH 15160 A=-ATN(YA/ZA):A=A»168/PI /YZ 

>NL 15170 IF ZA<0 AND YA >0 THEN A=A-180 >AD 

;NM 15172 IF ZA <0 AND YA<0 THEN A=A+180 >AJ 

;>CK 15174 IF ZA <0 AND YA =6 THEN A=180 >ZN 

>CJ 15180 X=B*SIN(A*PI/180>:Y=B*C0S(A*PI/l80) >KF 

>ZN 15240 XE=313+X*20O/AN:REM COORDONNEES ECRAN /MR 

;CT 15250 YE=266+Y*266/AN >PH 

/AB 15260 IF J=0 THEN PLOT XE.YE >VG 

>AC 15276 IF JOO THEN DRAW XE,YE, 1,0 >ZM 

>XC 15999 RETURN >PF 

>XY 18666 REM Acquisition éléments >AE 

>AH 4 18010 INPUT"Nombre d'éléments ";E:E=E-1 >PA 
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JOUEZ, CREEZ, APPRENEZ 1A MUSIQUE 
AVEC LE SYNTHETISEUR MUSICAL T.M.P.I 



12 VOIES STEREO pour CPC 464, 664. 6128. 



13501 



(OPTIONNEL) 



SWTHETISEUR ftSSlŒl 



HlfAH:MTfllï ] 



05 40 44 17 



980 F 



DISPONIBLES CHEZ VOTRE REVENDEUR - VENTE DIRECTE PAR CORRESPONDANCE 

PORT GRATUIT 

1 I hJIW^^ * LE NUM ÉRO I DU SON INFORMATIQUE 
U M F X. TECHNI-MUSIQU E & PAROLE INFORMATIQUE 

rue Fontaine-du-Bac 63000 Clermont-Ferrand 



18020 FOR K=Ô TO E:PRINT"Element numéro ";K+1: INPUT EL* >UT 
(K):NEXT K 

18999 RETURN >PJ 

270Ô0 REM REPRESENTER UN OBJET >ZR 

27005 CLS >FK 

27010 PRINT"REPRESENTER UN OBJET" :PRINT >LY 

27Ô20 PRINT:PRINT"a-Objet en mémoire" >NN 

27030 PRINT"b-Dessin par éléments" >LM 

27040 PRINT"c-Dessin par bloc":PRINT >LC 

27050 GOSUB 65000 : PRINT : CD=C:REM STOCKAGE TYPE DE D >DX 
ESSIN 

27055 IF AN <> THEN PRINT "Mêmes paramètres de visée ? >ZM 
": GOSUB 65020: IF C=15 THEN 27360 

27160 CLS : PRINT"a-Saisie point de vue au clavier" >GN 

27170 PRINT"b-Saisie écran ":PRINT:GOSUB 65000: CSAISIE= >XD 
C:REM STOCKAGE TYPE DE SAISIE 

27190 PRINT:PRINT"Coordonnees observateur :":PRINT >HK 

27200 INPUT"X=";XM >NM 

27210 INPUT"Y=";YM >NQ 

27220 INPUT"Z=";ZM: PRINT >VB 

27230 PRINT"Coordonnees point vise :":PRINT >YN 

27240 INPUT"XG=";XG >PZ 

27250 INPUT"YG=";YG >PC 

27260 INPUT" ZG=";ZG: PRINT >WV 

27270 PRINT"Ouverture angulaire" >KG 

27280 INPUT"20 degrés par défaut ";AN* >NB 

27285 IF AN*="" THEN AN = 20 : GOTO 27350 >DM 

27290 AN=VAL(AN*) >LG 

27350 CLS : GOSUB 7000: REM CALCUL PARAMETRES DE VISEE >XE 

27360 IF CD=2 THEN GOSUB 18000: REM saisie éléments >UZ 

27370 IF CD=3 THEN GOSUB 28000:REM Chgrger bloc >PR 

27380 ON CD GOSUB 12000,11000,10000 >AN 

27390 SOUND 1,50:LOCATE l,l:PRINT"Pressez <Return>":GOS >RV 
UB 65020 

27998 CD=0 >LJ 

27999 RETURN >PJ < 



28000 REM CHARGEMENT FICHIER BLOC >CB 

28010 INPUT"Nom du bloc ";BL$ >BN 

28020 OPENIN BL$ >LE 

28030 INPUT #9,E >FG 

28046 FOR K=0 TO E >LC 

28050 INPUT #9,EL$(K) >PV 

28060 INPUT #9,C0(K) >NU 

28070 INPUT #9,GX(K) >PA 

28080 INPUT #9,GY(K) >PC 

28090 INPUT #9,6Z(K) >PE 

28100 INPUT #9,RE(K) >NU 

28110 NEXT K >BH 

28120 CLOSEIN >UD 

28999 RETURN >PK 

6O0Ô0 REM SOus-programmes non encore existants >TD 
60010 CLS : PRINT"Sous-programme non encore cree...":60 >YV 
SUB 65020 

60999 RETURN >PF 

62000 REM CADRE >BB 

62010 CLS >FE 

62015 BORDER 14 >YC 

62020 PLOT 0,0 >LH 

62030 DRAW 639,0,3 >LL 

62040 DRAW 639,399,3 >NP 

62050 DRAW 0,399,3 >LR 

62060 DRAW 0,0,3 >ZA 

62999 RETURN >PH 

64000 REM PASSAGE SUR M0D1 >VN 

64999 CHAIN"P11BIS >NJ 

65000 REM Saisie caractère >VB 
6501O PRINT: PRINT"Votre choix :" >FQ 
65020 C$=INKEY$: IF C*= H " THEN 65020 >AH 
65030 C=ASC(C$) >XF 
65040 IF C>96 THEN C=C-96:G0T0 65535 >CQ 
65050 IF C<96 THEN C=C-64 >RU 
65535 RETURN >NGl 
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CPC Hors-Série 




vous propose tous les deux mois une sélection des meilleurs lis- 
tings de jeux, éducatifs et utilitaires. Des dizaines de kilo-octets de 
vitamines pour votre Amstrad CPC. 

Si vous êtes abonné, vous le recevrez gratuitement dans votre 
boîte à lettres en même temps que votre CPC ! 
Mais si vous avez des difficultés à vous les procurer, n'hésitez pas 
à nous les commander en utilisant le coupon ci-dessous. 




□ Hors série n° 1 45 F 

livré avec une cassette 

□ Hors série n° 2 13 F 

□ Hors série n° 3 15 F 

□ Hors série n° 4 15 F 

□ Hors série n° 5 15 F 



D Disquette HS 1 140 F 

D Disquette HS 2 140 F 

D Disquette HS 3 140 F 

D Disquette HS 4 140 F 

D Disquette HS 5 140 F 



Chaque disquette comporte tous les programmes du n° hors-série correspondant. Les abonnés à CPC 
bénéficient du tarif unitaire de 110 F pour les disquettes. 

Nom Prénom 

Adresse 

Code postal Ville 

Date Signature 

Merci d'écrire en majuscules. 

Ci-joint un chèque libellé à l'ordre des Editions SORACOM. Retournez le coupon ou une photocopie 

à Editions SORACOM - La Haie de Pan - 35170 BRUZ. 
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TRANSFERT 
D'IMAGE 

ECRAN 

CPC vers PC 1512 
ou autre compatible 

■ Christophe PAVEN 



Une chaude nuit d'été, deux heures du mat, 

l'UPSA bouillonne dans un verre, le cendrier 

déborde, quatre cadavres gisent dans la 

poubelle, les mains moites, les yeux 

injectés de sang, vous contemplez votre 

œuvre sur l'écran de votre AMSTRAD CPC 

surchauffé. Vite, on sauvegarde I 

Quelle est belle cette image I Et dire qu'il 

va falloir repartir à zéro pour faire la 

même sur PC 1512, encore une nuit blanche 

en perspective... Halte à l'esclavage 

informatique 

CPC et PCompatibles Magazine vous offrent 

dix heures de repos et votre image sur le 

PC. Un petit quart d'heure suffira avec un 

peu d'entraînement. 
La vulgarisation des Compatibles PC élargit 
le champ de diffusion possible des fruits de 

votre travail. 



OU EST LE PROBLEME ? 

LES MODES ECRAN 

Deux modes écran sont identiques sur CPC et PC : 

- Mode 2 sur CPC = 

SCREEN2 sur PC : 640 x 200 points en deux couleurs. 

- Model sur CPC = 

SCREEN1 sur PC : 320 x 200 points en quatre couleurs. 



Pour le mode du CPC, il n'y a pas d'équivalent sur PC, nous 
le laisserons donc de côté pour le moment. 
Toutefois, en SCREEN1 , le PC équipé d'une carte CGA est moins 
souple que le CPC pour ce qui est du choix des couleurs. Il n'est 
en effet pas possible, du moins sous GWBASIC, de modifier 
séparément les trois couleurs d'avant-plan dans une palette, seu- 
les les couleurs de fond et du bord sont modifiables à volonté 
(avec en commun la luminosité normale ou haute). 



LE SEUL SYNTHETISEUR VOCAL OURCPC 
PARLANT VRAIMENT FRANÇAIS ^s 6 " 







-jfinrsswssBS». 
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i 05 4 44 17 1 



110F 

AMPLIFICATEUR 
(OPTIONNEL) 



malkymull 






DISPONIBLES CHEZ VOTRE REVENDEUR 
i VENTE DIRECTE PAR CORRESPONDANCE 

PORT GRATUIT POUR ACHAT SUPÉRIEUR A 500 F\ 

LE NUMÉRO 1 DU SON INFORMATIQUE 



■ -L TECHNI-MUSIQUE & PAROLE INFORMATIQUE 

rue Fontaine-du-Bac 63000 Clermont-Ferrand 
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L'éventail offert est de six palettes de quatre couleurs si l'on 
tient compte de la possibilité de passer les trois palettes de base 
en haute luminosité. 

Attention, sur un moniteur monochrome, l'ordre des niveaux 
de gris ne suit pas les numéros de couleur. 
Pour remanier l'ordre des PEN sur CPC, l'auteur a mis au point 
un petit utilitaire baptisé TRANSPEN qui effectuera la transpo- 
sition en quelques secondes. 

LE CODAGE EN MEMOIRE ECRAN 

Quelque soit le mode écran, ce dernier est toujours divisé en 
deux cents lignes graphiques, nous prendrons comme ligne 
la ligne supérieure et comme ligne 1 99 la ligne inférieure. 

• Sur CPC, les lignes sont stockées en mémoire par 
"paquets" de 25 avec 48 octets d'espace libre à la fin de 
chaque paquet : 

— Le premier paquet comprend les lignes 0, 8, 16, 24, 
32..., 192. 

— Le second paquet comprend les lignes 1, 9, 17, 25, 
33..., 193. 

— Le huitième paquet comprend les lignes 7, 15, 23, 31, 
39..., 199. 

• Sur PC, les lignes sont stockées en deux paquets de cent 
avec 192 octets d'espace libre après chacun. 

— Le premier paquet comprend les lignes paires 0, 2, 4 6, 
8..., 196, 198. 

— Le second paquet comprend les lignes impaires 1 , 3, 5, 
7, 9..., 197, 199. 



Les tableaux 1 et 2 vous donnent les adresses mémoire de tou- 
tes les lignes graphiques pour CPC et pour PC. 
Chaque ligne est codée sur 80 octets, un octet représentant 
huit points en MODE2-SCREEN2 et quatre points en 
MODE1-SCREEN1. 

En MODE2-SCREEN2, le codage des huit bits de chaque octet 
est identique sur CPC et PC : bit 7 = point le plus à gauche 
; bit = point le plus à droite. 

En MODE1-SCREEN1, il n'en est malheureusement pas de 
même. Si chaque point est codé sur deux bits dans les deux 
cas, le couple de bits associé à un point n'est pas le même : 



Sur CPC 




Sur PC 


bits 3.7 
bits 2.6 
bits 1 .5 
bits 0.4 


Point le plus à gauche 
Point suivant 
Point suivant 
Point le plus à droite 


bits 7.6 
bits 5.4 
bits 3.2 
bits 1.0 


Les bits sont dans l'ordre : poids 2 - poids 1 



En résumé, nous avons toutes les informations dans la mémoire 
de notre CPC, mais dans un beau désordre (vu d'un PC). 



LES FICHIERS SUR DISQUETTE 

Bien entendu, il eut été trop simple que MS-DOS puisse relire 
un fichier sur une disquette provenant d'un CPC. MS-DOS ne 
sait relire aucun des formats d'écriture de P'AMSDOS ou du 
CPM ; par bonheur, le PC 1 5 1 2 est livré avec un second système 
d'exploitation : DOS+ qui est capable de relire une disquette 
au format CPM. Attention, seul le format CPM-IBM peut être 
relu par DOS + , pas le format dit "SYSTEME" du CPM 2.2 ou 3. 
Le format CPM-IBM comporte quarante pistes avec chacune huit 
secteurs de 51 2 octets, la piste est réservée et le catalogue 
se trouve sur la piste 1 . 



En effectuant une copie de notre fichier image sous DOS + , avec 
comme destination une disquette formatée sous MS-DOS, nous 
obtiendrons un fichier lisible par MS-DOS. 

La partie est presque gagnée I Presque ? 
Un fichier image sur PC (sous GWBASIC) a une longueur exacte 
de 1 6399 octets, le fichier issu de notre CPC fait 1 651 2 octets 
et toute tentative de chargement se solde par un laconique 
"BAD FILE MODE" 

En plus des 16384 octets représentant l'image, le fichier sous 
GWVASIC comporte un en-téte de 7 octets et une "queue" 
de 8 octets, alors que le fichier issu du CPC comporte un en- 
tête de 1 28 octets. 

Heureusement, ce cher Alan, dans son ineffable bonté, nous 
a une fois de plus fait don du bistouri permettant une magis- 
trale transplantation cardiaque entre nos fichiers incompatibles... 
Mais reprenons dans l'ordre et tout d'abord examinons l'envi- 
ronnement nécessaire. 

ENVIRONNEMENT MATERIEL ET LOGICIEL 

Vous devez bien entendu disposer d'un CPC et d'un PC 1512 
ou autre compatible, mais il n'est pas nécessaire qu'ils vous 
appartiennent tous les deux, ni même qu'ils soient dans la même 
pièce. 

Il vous faudra ensuite, côté CPC, un programme capable de 
changer les numéros de PEN de vos images comme TRANS- 
PEN et TRANSIMAGE ci-après ; c'est lui qui va remettre de l'or- 
dre dans les lignes et les bits et vous créer un fichier image de 
1 6384 octets au standard du PC. 
La suite dépend du mode transfert que vous envisagez. 




CAS DU TRANSFERT PAR LIAISON SERIE RS232 

Si votre CPC en est équipé, c'est certainement la solution la 
plus simple et la plus rapide. Vous pouvez même envisager des 
transferts à longue distance par MODEM. 
Attention toutefois, votre logiciel de communication doit être 
en mesure de "passer" tous les octets de à FF (255). L'au- 
teur, ne disposant pas de ce type de matériel, a opté pour la 
solution suivante. 



CAS DU TRANSFERT PAR DISQUETTE 5" 1/4 

• Coté CPC : il faut préparer une disquette 5" 1/4 au format 
CPM-IBM : Commande : > Format i (sous CPM). Cette com- 
mande n'étant active que sur le lecteur A, dans le cas où votre 
lecteur 5" 1/4 est uniquement en lecteur B, il faut d'abord for- 
mater une disquette 3" puis la recopier sur le lecteur B avec 
COPYDISC. 

Cette disquette 5" 1/4 au format CPM-IBM sera nommée Dis- 
quette n c 1 dans la suite de cet exposé. 

• Côté PC : il est impératif de disposer de DOS + (Disquette 
n° 2). Préparer une disquette SYSTEME sous MS-DOS (Dis- 
quette n° 3), avec la commande : FORMAT A:/S. 

- Y transférer DEBUG et GWBASIC.EXE plus, éventuel- 
lement un fichier AUTOEXEC.BAT exécutant KEYBFR pour un 
PC avec clavier AZERTY. 

Ne pas copier le fichier MOUSE.EXE (les adresses données pour 
l'utilisation de DEBUG ne conviendraient plus). 

— Lancer GWBASIC et taper les lignes suivantes : 
10 SCREEN1.0 : COLOR 0,0 

20 DEF SEG = &HB800 

30 BSA VE "IMAGE 1",0,&H4O00 

40 BSAVE"IMAGE2",0,&H4OO0 

Lancer ce programme, il va créer sur la disquette deux fichiers 
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image-écran. Vous devez créer sur cette disquette autant de 
fichiers "IMAGEx" que vous souhaitez y trans- 
férer d'images issues du CPC. 

Ces fichiers "bidons" sont destinés à recevoir le cœur (les 
16384 octets) des fichiers issus du CPC pour devenir de véri- 
tables fichiers image-écran utilisables sous GWBASIC. 

LE PROGRAMME TRANSIMAGE 

Il est composé de deux parties, l'une en BASIC et l'autre en 
langage machine pour obtenir une vitesse de traitement accep- 
table. Un petit chargeur BASIC facilite la saisie et la création 
du fichier TRANSIM.BIN. Le listing d'assemblage commenté est 
joint pour montrer la puissance et la simplicité du langage 
Assembleur. Cette routine traite une image en moins de deux 
secondes alors qu'un programme BASIC équivalent met huit 
minutes environ pour faire le même travail... (cas du MODE1 ). 
L'emplacement pour insérer ou appeler un logiciel de commu- 
nication est repéré dans le listing BASIC à l'attention de ceux 
qui souhaiteraient utiliser une liaison SERIE RS232. 
Le déroulement du programme oblige le passage par trois éta- 
pes : 

• Sélection Entrée-Sortie : 

Vous devez indiquer au programme l'unité source sur laquelle 
se trouve l'image à traiter et l'unité destination qui recevra le 
fichier après traitement. Afin de ne léser personne, la sélection 
"Cassette" a été incluse dans le cas où vous n'auriez pas de 
lecteur de disquettes, mais une interface série. 
Si l'unité destination est la même que l'unité source, le pro- 
gramme s'arrêtera avant la sauvegarde pour vous laisser le 
temps de changer de disquette ou de cassette, car le traitement 
de l'image est très rapide. 

• Mode couleurs : 

Le choix du mode écran est capital puisque le traitement est 
différent dans chaque cas. Le choix des couleurs aurait pu être 
facultatif mais il est plus agréable de voir son oeuvre dans ses 
couleurs d'origine. 

• Noms Entrée-Sortie : 

En entrée, il est obligatoire. L'extension doit être spécifiée si 

elle est différente de .BIN. 

La longueur du nom est limitée à 12 caractères si l'unité source 

est un lecteur de disquettes, à 1 6 pour le lecteur de cassettes. 

Le nom en sortie est facultatif, si vous pressez ENTER, il sera 

le même qu'en entrée. 

Le chargement, le traitement et la sauvegarde s'effectuent 

ensuite en quelques secondes. 

DEROULEMENT DE L OPERA TION DE TRANSFERT 

Vous allez dire que je rabâche, mais pensez bien à vérifier la 
concordance des PEN de votre image originale avec les cou- 
leurs des palettes du PC, sinon il faudra recommencer... je vous 
aurais prévenu I 

— Traiter l'image avec TRANSIMAGE, nous supposerons que 
le fichier, sauvegardé sur la disquette n° 1 (5" 1/4 CPM-IBM) 
se nomme ESSAI.BIN. 

— Passons sur le PC : démarrer avec la disquette n° 2 (DOS + ), 
puis mettre la disquette n° 1 dans le lecteur A et la disquette 
n° 3 dans le lecteur B et taper : COPY A:ESSAI.BIN B: 
Pour ceux qui ont un seul lecteur, le DOS demandera d'intro- 
duire la disquette destination après chargement du fichier en 
mémoire, puis de remettre la disquette source dans le lecteur 
après la copie. 

— Mettre la disquette n° 3 dans le lecteur A et réinitialiser le 
système pour repartir sous MS-DOS (ALT + CTRL + DEL celle 
du bas du pavé numérique sur PC 1512). 

Lancer DEBUG (le bistouri). Cet utilitaire va nous permettre d'ef- 
fectuer la transplantation des 1 6384 octets de l'image du fichier 
ESSAI.BIN vers le fichier "IMAGE1.BAS" créé lors de la pré- 
paration de la disquette n° 3. 



Répéter les mêmes opérations pour les images suivantes avec 
les Noms correspondants. Le fichier IMAGE1.BAS contient 
maintenant l'image du fichier ESSAI.BIN, ce dernier n'étant plus 
d'aucune utilité, vous pouvez l'effacer sur les disquettes n° 3 
et n° 1. 



Suite des commandes à taper 


Commentaire 


-NESSAI.BIN 


Définit le nom du fi- 
chier à charger ou à 
sauver 


-L 1000: 5000 


Charge le fichier à l'a- 
dresse absolue 
&H 15000 


-N IMAGE 1. BAS 




- L 1 000 : 


Charge le fichier IMA- 
GE 1. BAS à 
l'adresse &H1 0000 


- M 1 000 : 5080 L 4000 1 000 : 0007 


Transfère 1 6384 oc- 
tets de l'adresse 
&H1 5080 vers 
& H1 0007 


-W1000:0 


Réécrit sur le disque 
le fichier IMAGE 
1.BAS 


400 F octets copied 


Message de DEBUG 
après copie du conte- 
nu du fichier. 



VISUALISA TION DE L IMAGE SUR LE PC 

— Lancer GWBASIC 

— Taper un programme de chargement : 
Exemple : 

10 SCREEN1,0:COLOR 0,0 
20 DEF SEG = &HB800 
30BLOAD"IMAGE1",0 
40 GOTO 40 

— Taper RUN (ou F2) et voilà le travail ! 

La phase d'entraînement passée, il ne faut pas plus d'un quart 
d'heure pour effectuer un transfert complet. 
PS : une image initialement en MODE1 sur CPC peut être affi- 
chée en SCREEN2 sur PC 1512 ; en version mono- 
chrome, le résultat est même plus joli qu'en SCREEN1. 



I 
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ab/ec 










*» ADRESSES 


rlEftOlRE ECRAN SUR 


CPC ** ' 


W 




** 


ADRESSES HEnOIRE ECRAN SUR 


PC1512 


** 








L?8. 


! 91. 


L92. 


L93. 


L94. 


L95 


lié 


L97 






L»e 


Lil 


L92 


L93. 


L»4. 


L95. 


L*6 


L97 


Lt 1 


début 
fin. 


C888 
C84F 


C888 
E84F 


D888 
D84F 


0888 
084F 


E888 
E84F 


E888 
E84F 


F 888 

F84F 


H388 
F84F 


Lt 1 


début : 
fin 


68888 
B884F 


BRB68 
BR84F 


B8858 
8e89F 


BA050 
6A09F 


B86A0 
B80EF 


6A0A0 
6A0EF 


688F8 
6813F 


BR0F0 
BR13F 


Lt 2 


début : 
fin. 


C856 
C89F 


C858 
C89F 


D858 
D09F 


0858 
089F 


E858 
E09F 


E858 
E89F 


F858 
F89F 


F858 
F89F 


Lt 2 


début 
fin 


B814B 
B818F 


BR148 
BR18F 


68198 
B810F 


6A190 
6A10F 


B81E8 
6622F 


6A1E8 
6A22F 


68230 
6827F 


BR238 
BR27F 


Lt 3 


début : 
fin. . 


C8R8 
C8EF 


C8R( 

C8EF 


D8FI8 
DBEF 


D8R8 
D8EF 


E8RB 
E8EF 


E8A0 
E8EF 


F8R8 
F8EF 


F8R8 
F8EF 


Lt 3 


début ; 

f in . . 


68288 
B82CF 


BR238 
BR2CF 


B8208 
6831F 


6A208 
BB31F 


B8320 
B836F 


BA328 
BA36F 


68378 
B836F 


BR370 
BR36F 


Lt 4 


début : 
f in. . : 


CBF8 
C13F 


C8FB 
C93F 


[)8F8 
013F 


08F8 
093F 


E8F8 
E13F 


E8F8 
E93F 


F8F8 
F13F 


F8F8 
F93F 


Lt 4 


début 
fin.. 


B83C8 
B846F 


BA3C8 
BA48F 


68418 
6845F 


BA410 
BB45F 


B8468 
B84AF 


8A468 
BA4AF 


a84B8 
884FF 


BR468 
BR4FF 


Lt 5 


début : 
f in. . 


C14B 
C18F 


C94B 
C98F 


D14B 
D18F 


D94B 
D93F 


E148 
E18F 


E948 
E98F 


F148 
F18F 


F948 
F98F 


Lt 5 


début 
fin. . 


68588 
B854F 


6R580 
6R54F 


68558 
6859F 


BA55B 
BB59F 


B85A8 
B85EF 


BA5A8 
BB5EF 


B85F0 
B863F 


BR5F8 
BR63F 


Lt 6 


début : 
fin . 


C198 
C1DF 


C998 
C9DF 


D198 
D1DF 


0998 
090F 


E190 
E10F 


E998 
E90F 


F198 
FlDF 


F998 
F90F 


Lt 6 


début : 
f in 


B8648 
B863F 


6A648 
6A68F 


68698 
B86DF 


6A690 
BA6DF 


B86E8 

B872F 


BA6E8 
BA72F 


B8738 
B877F 


BR730 
BR77F 


Lt 7 


début : 
f in. . 


L1E0 
C22F 


T9E8 
CR2F 


D1E8 
D22F 


09ER 
0R?F 


E1E8 
E22F 


E9E8 
ER2F 


F1E8 
F22F 


F9E8 
FR2F 


Lt 7 


début 
fin 


68788 
887CF 


BA788 
BR7CF 


68708 
B881F 


BR7O0 
6R81F 


B8820 
B886F 


BA828 
BA86F 


88878 
B88BF 


BR878 
BR8BF 


Lt 8 


début : 
fin.. 


L230 
C27F 


CR38 
CR7F 


D238 
D27F 


0R38 
DR7F 


E238 
E27F 


ER38 
EH7F 


F238 
F27F 


FR38 
FR7F 


Lt 8 


début 
fin. 


688C6 
B898F 


BA8CB 
8A98F 


68918 
6895F 


BR918 
6R95F 


B8968 
889BF 


BA968 
BB9AF 


B89B0 
689FF 


6R9B8 
BR9FF 


Lt 9 


début 
fin 


C288 
C2CF 


CR38 
CRCF 


D288 
D2CF 


0R88 
ORCF 


E288 
E2CF 


ER88 
ERCF 


F288 
F2CF 


FR88 
FRCF 


Lt 9 


début 
fin. . 


86RBB 
B8R4F 


BRR88 
BRA4F 


68R58 
68R9F 


6RA58 
6AA9F 


B8AA8 
B8AEF 


BRRR8 
BRREF 


B8RF0 
B883F 


BRRF8 
BRB3F 


Lt 18 


début : 
fin. . 


C208 
C31F 


CBD8 
CB1F 


O2D0 
D31F 


0RD8 
DB1F 


E208 
E31F 


ERD0 
EB1F 


F208 
F31F 


FR08 
FB1F 


Lt 18 


début 
fin. 


68648 
68B8F 


BAB48 
BAB8F 


B8698 
8860F 


BA690 
6R60F 


686E8 
B8C2F 


BR6E8 
6RC2F 


88C38 
B8C7F 


BRC38 
BRC7F 


Lt il 


début . 
fin. . 


C328 
C36F 


CB28 
CB6F 


D320 
036F 


DB28 
DB6F 


E328 
E36F 


EB28 
EB6F 


F328 
F36F 


FB28 
FB6F 


Lt 11 


début : 
fin 


B8C88 
88CCF 


BAC88 
8RCCF 


B8C08 
6801F 


BRC08 
BRD1F 


B8028 
B806F 


8RO20 
6RD6F 


B8D78 

B3D6F 


BRD70 
BROBF 


Lt 12 


début : 
fin 


C378 

C3BF 


CB78 
CBBF 


D378 
D3BF 


DB78 
DBBF 


E370 
É3BF 


EB78 
EBBF 


F378 

F3BF 


FB78 
FBBF 


Lt 12 


début : 
fin. . 


680C8 
B8E8F 


6ADC8 
6AE8F 


B8E18 
B8E5F 


BRE18 
8RE5F 


B8E68 
B8EBF 


6RE66 
BRERF 


B8EB8 
B8EFF 


6REB0 
BREFF 


Lt 13 


début : 
fin 


C3CB 
C48F 


CBC8 
CCBF 


D3C8 
D48F 


DBC8 
0C8F 


E3C8 
E48F 


EBC8 
EC8F 


F3C8 
F48F 


FBC8 
FC8F 


Lt 13 


début : 
fin. . 


68FB8 
B8F4F 


8AF8B 
BAF4F 


88F58 
B8F9F 


BRF58 
8AF9F 


B8FB8 
B8FEF 


BRFR8 
BRFEF 


68FF8 
6983F 


BRFF6 
B663F 


Lt 14 


début : 
fin-. 


C41B 
C45F 


CC18 
CC5F 


D418 
D45F 


DC18 
DC5F 


E418 
E«5F 


EC18 
EC5F 


F418 
F45F 


FC18 
FC5F 


Lt 14 


début : 
fin. 


89946 
B988F 


66848 
B688F 


B9898 
B9B0F 


66898 
BB80F 


698E8 
B912F 


B68E8 
B612F 


69138 
B917F 


66130 
B617F 


Lt 15 


début 
fin , . 


C46B 
C4RF 


CC60 
CCflF 


D460 
D4flF 


OC60 
OCRF 


E468 
E4RF 


EC68 
ECRF 


F468 
F4RF 


FC68 
FCRF 


Lt 15 


début 
fin. . 


B9188 

B91CF 


BB188 
BBlCF 


69108 
6921F 


BB1O0 
6B21F 


B9228 
6926F 


66228 
B626F 


69278 
6926F 


66278 
6626F 


Lt 16 


début : 
fin . 


C4BB 
C4FF 


CLB6 
CCFF 


04B8 
D4FF 


0CB8 
OCFF 


E4B8 
E4FF 


ECB8 
ECFF 


F4B0 
F4FF 


FCB8 
FCFF 


Lt 16 


début 
fin 


B92C8 
B938F 


BB2C8 
BB38F 


69318 

B935F 


66318 
B635F 


B9368 
893AF 


66368 
BB3RF 


693B8 
B93FF 


BB3B8 
BB3FF 


Lt 1? 


début : 
fin. . 


C58B 
C54F 


CD88 
CD4F 


D588 
D54F 


0088 
0D4F 


E588 
E54F 


E088 
E04F 


F580 
F54F 


F088 
F04F 


Lt 17 


début 
fin. 


B9488 
6944F 


BB488 
BB44F 


B9458 
6949F 


66458 
B649F 


B94A8 
694EF 


BB4R8 
BB4EF 


B94F0 
6953F 


BB4F8 
6653F 


Lt 18 


début : 
fin. . 


C558 
C59F 


CD58 
CD9F 


D558 

D59F 


0058 
009F 


E55B 
E59F 


E058 
E09F 


F558 
F59F 


F058 
F09F 


Lt 18 


début : 
fin. . 


69548 
6958F 


BB546 
BB58F 


B9598 
B95DF 


BB598 
6850F 


695E8 
6962F 


6B5E0 
6B62F 


89638 
6967F 


66638 
BB67F 


Lt 19 


début : 
fin. . 


C5A8 
C5EF 


C0R8 
CDEF 


D5R8 
D5EF 


ODR0 
DOEF 


F.3R8 
E5EF 


E0R8 
EOEF 


F5R8 
F5EF 


FDR8 
FOEF 


Lt 19 


début : 
fin. 


69688 
696CF 


BB688 
BB6CF 


69608 
B971F 


66600 
BB71F 


B9726 
B976F 


BB720 
BB76F 


B9770 
6976F 


B8770 
6676F 


Lt 28 


début ; 
fin. . 


C5F6 
C63F 


CDF0 
CE3F 


D5F8 
063F 


DDF0 
0E3F 


E5F8 

E63F 


E0F8 
EE3F 


F5FB 
F63F 


F0F8 
FE3F 


Lt 28 


début : 
fin. 


897C8 
B988F 


6B7C8 
BB88F 


89818 
6985F 


68818 
6685F 


B9860 
898BF 


B6866 

BB8RF 


698B8 
B98FF 


668B8 
BB8FF 


Lt 21 


début 
fin. . 


C640 
C68F 


CE4B 
CE8F 


D640 
068F 


0E48 
0E8F 


E648 
E68F 


EE48 
EE8F 


F648 
F68F 


FE48 
FE8F 


Lt 21 


début 
fin. 


69988 
6994F 


86988 
8694F 


B9958 
B999F 


BB950 
BB99F 


699A8 
B99EF 


BB9R8 
BB9EF 


699F8 
B9R3F 


BB9F8 
BBR3F 


Lt 22 


début : 
fin. 


C698 
C6DF 


CE98 
CEDF 


0698 
06DF 


0E98 
DEOF 


E698 
E60F 


EE98 
EEDF 


F698 
F60F 


FE98 
FEOF 


Lt 22 


début 
fin. 


69R48 
89R8F 


B6A48 
66A8F 


B9A98 
B9B0F 


BBA98 
8BADF 


B9AEB 
B9B2F 


B6RE8 
66B2F 


69638 
B9B7F 


66638 
6667F 


Lt 23 


début : 
fin. . 


C6E8 
C72F 


CEE! 

CF2F 


06E8 
072F 


0EE8 
0F2F 


E6E8 
E72F 


EEE8 
EF2F 


F6E8 
F72F 


FEE8 
FF2F 


Lt 23 


début : 
fin. . 


89868 

esecF 


BBB88 
BB6CF 


69800 
B9C1F 


BBB08 
BBC1F 


89C20 
B9C6F 


BBC28 
BBC6F 


B9C7B 
B9CBF 


B8C78 
86C8F 


Lt 24 


début : 
fin. . 


C738 
C77F 


CF30 
CF7F 


0738 
077F 


0F38 
0F7F 


E738 
E77F 


EF38 
EF7F 


F738 
F77F 


FF38 
FF7F 


Lt 24 


début : 
fin. 


89CC8 
6908F 


6BCC8 
BB08F 


B901B 
8905F 


66D10 
6BD5F 


B9068 
B9DRF 


BBO60 
8BDRF 


69068 
89DFF 


eeoee 

BBOFF 


Lt 25 


début 
fin. 


C788 
:7CF 


CF88 
CFCF 


0788 
D7CF 


0F88 
DFCF 


E788 
E7CF 


EF38 
EFCF 


F788 
F7CF 


FF88 
FFCF | 


|L t25 


début : 
f in. . 


69E88 
B9E4F 


BBE88 
BBE4F 


B9E56 
89E9F 


BBE56 
BBE9F 


89EAB 
69EEF 


6BER0 
B6EEF 


69EF8 
B9F3F 


B6EF8 
66F3F 
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Chargeur BASIC 



***** CriAfibEuR ÈMÔiC F'ÛuR TftAh5ln.BIN ***** 



iC) 19b" 1 C.PAVEN i SÛfiACûri 



10 ClS: RESTORE: Fûfi l=u TO lO:5Ur1=ô 
20 FOR J=0 TO ISîGÛSUB 7 0:5UM=5UM+Dh t 
30 Pût ; E (Et90^0+L*16+Vi ,DAT:NEXT V 
40 605UB 70: IF DATOSUM THEM 80 ElSE PRINT"Liqne 
QK":!€XT l 
50 SAvE" ■ TRAN3IM. BÎN : , B, &900O. iA6 
60 END 

70 READ V$;DAT=VAL("&''-i-V*):RETURN 
8v llSjPRInT CnRî ■'". :"*** ERREUR EN DAÏh LIGNE : 
■:5T0P 
90 

100 

105 
lié 
115 
120 
125 
130 



14vj 

145 
150 

1=K 



jh!h 21.00.C0. il. #.46.06.^2. C5.E5.0a. 19. 

DhTA C5.E5.0ô.5u,C5,Og.ûu.7E,CB.~F,29,u2, 
DaTA 28,u2.C6.E0,CB.ûF.2b.u2.CB,Du,CB.6 7 . 
jAïA CB.5F,26,u2.CB.F8.CE.57.28.02.CB.E6. 
DATh LB.D8.LB.47.2e.02.CB,C6."R. 12.22,13. 
DATA D5.il. Ou. 10. 19.D1.L1. iO.B7.El.D5. i;. 
DATA Cl. 10, A9, £1,1 1.00,08, 19, ii. 00, 60, Cl. 
DATA 00. CO. il.0O.40.Oe,û2.C5.E5.Û6. 19. C5, 
DATA E5,ui.50.00,ED.B0.Ei,D5,il.00.iU. 19, 
DATA El, 05,11,50. 00. 19,01. Cl, 10. Ei.Éi, il, 
DATA Ou, 60. Cl. i0.D2.C9.O0.00.0O.0u.0O.0O. 
***** FIN DES DATA *****© 



C5.Es 


US.U4 


yiifc * 


CB.FO 


CB.77. 


u. : B" 


26. u2 


Cb.Cu 


07BB 


CB.4F 


26.02. 


0?5A 


Ci, lu 


C5.E1 


■fh z 


50. 00 


,9,21 


Oeo9 


10. 3 A 


C 9 . 2 i 




E5,0o 


u4,C5. 


055B 


r. i ri 

U i , L i 


iû.EF 


u754 


Ou. 06 




05D7 


Ou. uu 


uû , uu 


&~ ; Cl 



Transim.bas 



1 **** ^TRANSÏHAbE **** /FA 

2 ;,pg 

Transcodeur d imaqe écran CPC -> PC ou Compatible .^i 

4 (C) 1987 C.PAVEN St Les Editions 3ÛRACÛM ;rû 

5 ;FE 
lu ùPEN0UT' ! d": MEMORY i:3FFF:CLÛ5EQuT:LûAB" ! TRANSIM.BIN". >LB 

?<90ÛÔ 

20 G03UB 400:6Û5UB l02u >RN 

30 60SUB 340;SOSUB 5lO:GOSUB 670:GG6UB 8O0:6O8UB 880 >WF 

40 >LD 

50 Insérer éventuel leaent ici ie Pilote de votre rout >LE 
me de communication 

60 pour transférer le -fichier traite par liaison 3ERI >LF 
E RS232 



;, u sauveqaroe as i imaqe coaee PC 

100 IF usî=ueï THEN bûSuB 95u 

liw IF us$="k" THEN snoa$='" "+ns* ELSE snofflf=U5*+': '+ns 

ï 

120 SAvE anoîii*.D.i40uu.i4uuO 

l3u 60SUB 4uO:6ûTû 30 

140 

:5u inessaqes fenêtre 5 

160 »es$=" *** INFORMATIONS *+* ":G03uB 220: RETURN 

170 mest=" SELECTION ENTREE-SORTIE :305uB 220: RETURN 

180 mesS=" *** METTRE EN PLACE lES SUPPORTS MAGNETIQUE 

S ENTREE-SORTIE *** ":6QSUB 220:RET0RN 

190 mes$=" MQDE-CÛULEURS IMAGE "îGQSUB 2^0:RETuRN 

2ùu mes*=" NOMS ENTREE-SORTIE ":6ÛSUB 220:RETuRN 

210 ME3*=" *** SAUVEGARDE »** ":603uB 22u:RETURN 

220 CL5*5: fiies=LEN i nies* ' ; iac-lNT < \ 78-mes î 11)-* i: LCCATES5, 

i oc . i : FR I NTffS . CHR4 I 24 ; +«tes$+CHR* (24>;:PRÏNT CriR* 1 7; :RET 

URN 

23u 

240 saisis au cncix 

250 IF NOT INKEh64j OR NûT INKEruC 'rttsi rep=l:ft£TURN 



l.: 
«F 



PF 

RG 

■'B 

2h 

•MW 

fp 
KM 



it NÛT It#,tl 



NO! iN»-,Em4) THEN rep=2: RETURN 



270 IF NOT IhtKEïi57i OR Nul INKErtSj ThEN rep=3:RETURN 

EL5E 25u 

280 

290 tarrs a espace Pour continuer 

300 PRINT CrtRî^TS 

3iu IF NûT INKEYt47i ThEN RETURN ElSE 310 

320 

330 "ider butter clavier 

340 ik$=' : x":WHlLE ik*<>"":ik$=INKEV*:l€ND:RETURN 

350 

3e0 temporisation 

370 FOR tt=0 TO 200:NEXT tt: RETURN 

380 

390 Trace du cadre 

400 INK 0.13: BORDER i3:INK 1.0: MODE 2 

410 WINDÛW#0.i.80.25.25:CL5:WINDOW#i. 2.79.7. 23:CLS#1:WI 

NDÙW#3. 2. 39. 2. 3:ClS#3: WINDÛW#4. 42. 79. 2. 3: Ci_5#4: NlNDÛw#5 

,2,79,5.5:CL5#5 

420 MÛVE 2. 24: DRAW u.370:DRAHR 634.0:DRAWR 0. -370: DRhw 

F. -634.0:M0VER 634.288: DRAvJR -634.0:MQyER 0.32:DRAWR 63 

4.0:MÛVER -316.0:DRAWR 0.48 

430 Mû VER -4,-4:DRAnlR -310.0: DRAW* 0.-38: DR A* 3 10.0: DR 

AWR 0=38:DRAwR 0,2:DRAwR -310.0:DRAwR 0.-42:DRAWK 310.0 

440 L0CATE#3. 10.1:PRINT#3. "T R A N 5 I M A G E" 

450 L0CATE#3,11.2:PRINTi3."{Cl 1967 C.PAVEN": 

460 L0CATE#4.6, 1:PRINT#4. "ENTREE. . . : ': 

470 L0CATE#4. 6. 2: PRINTI4. "SORTIE. . . : " : 

480 RETURN 

490 ' 

500 Select îdn Entrée-Sortie 



TA 

T B 
LH 
hn 
fit 
Rb 

;■ y / 

Rj 
RH 
CQ 

TB 

Tr 
I u 

DE 



■LU 



m 

/PL 
,'GA 
>6V 
>ZH 
>TD 
/RF 
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518 CLS#1:6Q5UB L70:LOCATE #l,28,4:PRINT#i. "UNITE D ENT >KF 
REE (Source) *:60SUB 640 

520 GOSUB 25tt:GUSUB 37Ô:GÛSUB 340 >AD 

536 IF rep=i IHEN ue$="A" ELSE IF rep=2 THEN ue*="B" EL >HA 
SE ue*="K" 

540 LOCATE #4,18.1: IF ue$="A" OR ue*= !: B" THEN PRINTI4. " >TX 
Disquette ":uet: ELSE PRINT#4, "Cassette ": 
550 LOCATE #i.25.4:F'RINT#l. "UNITE DE SORTIE i.Bestinatio )WJ 
n)"+CHR*t/) 

560 SOSUB 250: GOSUB 370:GOSUB 340 >Ah 

570 IF rep=l THEN us*= :i A" ELSE IF r«>=2 THEN us*="6" El /HA 
SE us$="K" 

580 LOCAÏE #4. 18.2: IF ust="A" OR us$="B" ll€N PftINT#4," ;UP 
Disquette ":us$: ELSE PRINT #4, "Cassette '; 
590 IF iue$="A" AND us$="K") ÛR (ue*=' J B' AND us$="K") I >BT 
HEN ÎTAPE.OUT: iDISC.IN 

600 IF iue*="K" AND us*="A") ÛR <ue*="K" AND us$="B Él j T >6J 
HEN ! TAPE. IN:! DISC. OUT 

610 IF lue$="A" AND us*="A") ÛR (ue*--B" AND us*="B"; Û >YD 
R (ue»="B" ANL' us*="A"i OR iue$="A" AND us$="B") THEN ! 
DISC 

620 CLS#1: GOSUB 180:LÛCATE#1. 19, 8:PR1N1#1, "Presser < ES >XN 
PACE > lorsque vous êtes pret*:6QSU8 300 
630 SOSUB 340:RETURN >QZ 

640 LOCATE#1,30,6:PRINT#1,"< 1 > Disquette A":LQCATE#1. >UE 
30.8:PRINT#1,"', 2 > Disquette B":LOCATE#i,30,l@:PRINT#l 
,"< 3 > Cassette" :RETURN 

650 >TB 

660 Mode couleurs de T image il 

670 Q_S#1: GOSUB 190:LOCATE §i,3«,3:PRINTtl, MODE ( 1 ou ,'HA 
2 ) "; 

680 60SUB 250: GOSUB 370: GOSUB 340: IF rep>2 THEN 686 >UV 
690 F'RINT#l,rep;:m=rep: LOCATE #i, 36, 5: PRINTil. "COULEURS >EZ 

il 

700 LOCATE#1.2V,7:INPUT#i.;"Encre i a 2û / ',e0:vt= /Mri 

e0:6OSUB 760: IF tf=i THEN 700 

710 LÛCATE*i,29,9:INPUT#l,: "Encre i ( a 26 ) ".el:vt= >MH 

el: GOSUB 760:1F tf=i THEN 710 

720 IF (if2 THEN 750 >LD 

730 L0CATE#l,29,li:INPUT#l,; "Encre 2 i a 26 ) ".e2:vt >Ff 

=e2: GOSUB 760: IF tf=l THEN 730 

740 L0CATE#1,29, 13: INPUTtl,; "Encre 3 ( a 26 ) ",e3:vt >PN 

=e3: SOSUB 760: IF tf=l THEN 740 

750 RETURN >ZH 

760 IF vtx© OR vt/26 THEN tf=l ELSE tt=0 >FB 

770 RETURN >ZK 

780 ' >TF 

790 ' Noms en entrée et sortie >TG 

800 CLS#1: GOSUB 200 >NX 

810 LOCATE#l,16,5:PfiINT#l.SPC(50):LÛCATE#l,l6,5:INPUTtl >ZV 

,;"Nom en entrée (avec extension) :",ne$:IF ne*="" THEN 

810 

820 IF ue*="K" AND LEN(ne$)>16 THEN 810 ELSE IF iue*="A ;>RZ 
" OR ue*="B") AND LEN(ne$)>12 THEN 810 
830 LOCATEil,16,8:PRINI#l,SPC(50i:LOCATE#l,16,8:INPUF#l >HE 
,;"Nom en sortie (avec extension) :",ns*:IF ns*="" THEN 

ns*=ne* 
840 IF us$="K" AND LEN(ns$)>16 THEN 830 ELSE IF (us*="A >TÏ 



" OR us$= : 'B il ) AND LENlns*)>12 THEN B30 
850 RETURN >ZJ 

860 ' /TE 

870 Chargement et Traitement de i image ;TF 

880 MODE m:INK 0.e0:INr, l.el: INK 2,e2:INK 3,e3 >HZ 
890 IF ue$="K." THEN enomt=" ! "+ne$ ELSE enom*=ue*+": "+ne >YV 
$ 

9O0 LÛAD enom*.S<C000 ,NB 

910 IF m=l THEN CALL 4:9000 ELSE CAlL !>906F M 

920 RETURN >ZG 

930 ' >TC 

940 Confirmation changement de support magnétique , ; TD 
950 GOSUB 400 hh 

960 LOCATE #4. 18.1: IF ue$="A" OR ue$="B" THEN PRINT#4." >TD 
Disquette ":ueï; ELSE PRINT#4. "Cassette ": 
970 LOCATE #4, 18, 2: IF us$="A" OR us$="B" THEN PRINT«4. ' >UT 
Disquette ":us$; ELSE PRINTI4. "Cassette ": 
980 GOSUB 210: LOCATE #1.22, 8: PRINTil. "METTRE EN PLACE L >FB 
E SUPPORT DE SORTIE" 

990 GOSUB 1120:GOSUB 340:RETURN >AM 

1000 ' >XD 

1010 Informations ... >XE 

1020 GOSUB 160:LOCATE#1,5.2:PRINT#1. ! - Ce iogiciel va v >QV 
ous permettre de transférer vos meilleures créations :: 
L0CATE#1, 1, 3: PRINT#1, "graphiques sur CPC vers un PC 151 
2 au autre compatible PC. et ce pour les": 
1030 L0CATE#l,l.4:PRINT#l."modes 1 et 2 du CPC. (Screen >FP 
1 et 2 sur PC équipe d'une carte CGA;":L0CATE#1.5.6:PRI 
NT#1,"- Deux modes de transfert sont possibles, le plus 
simple est d utiliser"; 

1040 L0CATE#l.l,7:PRINT#l."une interface série RS232. L >QC 
a place est réservée dans ce programme pour y";:LûCATE# 
1,1,8:PRINT#1, "introduire les commandes nécessaires." 

1050 L0CATE#l.l,9:PRINT#l."Le second utilise le support >SU 
disquette 5 "1/4 , mais demande plusieurs maniP 

ulations pour obtenir un -fichier utilisable sous GWBASI 

C." 

1060 L0CATE#1,5,12:PRINT#1,"- Cette disquette devra pre >TP 

alablement être formatée au format IBM-CPM";:LQCATE#1.1 

, 13: PRINT#1," (commande: /format 1 sous CPM2.2! seul ce 

format peut être relu, et uniquementsous DOS+, par un P 

L." 

1070 GOSUB 1120:GOSUB 340:CLS#1:LOCATE#1,5,2:PRINT#1, "- >QJ 
Il est nécessaire de faire concorder Tordre des PEN s 

ur CPC avec les"; 

1080 L0CATE#1, 1, 3: PRINT#1, "couleurs de Palette du PC. L >UR 

e programme TRANSPEN (du même auteur) fait ce trava 

il en quelques secondes." 

1090 L0CATE#1,5,6:PRINT#1,"- Les images originalement e 

n mode 1 sur CPC peuvent, après traitement,"; 

1100 L0CATE#l,l,7:PRINT#l,"etre affichées aussi bien en 
SCREEN 1 (320*200 en 4 couleurs) qu'en SCREEN2 (640* 

200 en 16 couleurs) sur un PC1512." 

1110 GOSUB. 1120: GOSUB 340: RETURN 

1120 LQCATE#1,25, 16: PRINTttl, "Presser < ESPACE > pour su 

ite";:60SUB 3WîRETURN 

1130 ENDO >YD 



>TP 



CA 



>AE 
>PZ 
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I 



Rallonge alimentation + vidéo 

D ne soyez plus collé à l'écran, rallonge 464 . 130 F 

G ne soyez plus collé a l'écran, rallonge 6128 1 80 F 

G housse pour moniteur + clavier 175 F 

(préciser couleur ou monoc.) 

G ruban imprimante DMPI (par 2) 198 F 

G ruban imprimante DMP 2000 99 F 

G. adaptateur peritel tous CPC 490 F 

Câble imprimante AMSTRAD 
Vous permet de connecter votre AMSTRAD à n'im- 
porte quelle imprimante au standard "centronic". 
G câble imprimante 150 F 



D joystick compétition 
PR05000 .... 17( 




TKio 




„ me 
Amstrad 

CPC 6128 

_ 


(clavier AZERÎY) 1 




M SUPER-PROMOTION 

D CPC 6128 coul + impr. 
DMP 2000 5490 F 


□ CPC 6128 monochrome 2990 F 

□ CPC 6128 couleur 3990 F 

D CPC 464 monochrome 1990 F 

DCPC 464 couleur 2990 F 

1 j imprimante DMP 2000 1690 F 


□ interface RS 232 (Amstrad) S90 F 




19911 F 


□ 2ème lecteur de disquettes 1590 F 

□ mangetophone (avec câble) 340 F 

□ câble magnéto 50 F 



DIGITAUSEURARA 

Ce digitaliser vous permettra non seulement de 
digitaliser des images vidéo provenant d'une ca 
méra mais aussi des images provenant direc- 
tement de votre T.V. Un logiciel très complet 
vous permettra d'embellir, retoucher, stocker... 
les images digitalisées. Entièrement français. 
G digitaliser ARA 990 F 



ni 


1 


1 


□ PCW 8256 




■Ai 


• 


4750 F 

5925 F 

1990 F 

690 F 


□ PCW 8512 




U2' lect PCW 8256 
Umtert RS 232/centronic 





produits DART 
STYLO OPTIQUE : De loin le meilleur de tous, 

le stylo optique DART à fibre optique vous 
permettra de réaliser de véritables chef d'oeu- 
vres. Fourni avec logiciel d'exploitation très 
complet. 

Gstylo optique (disquette) 395 F 

Gstylo optique (cassette) 355 F 

SCANNER GRAPHIQUE : Ce scanner, très sim- 
ple d'utilisation, vous permettra de digitaliser 
toute image sur support papier, à partir de la 
DMP 2000. Fourni avec un logiciel d'exploita- 
tion très puissant. 
D scanner graphique "DART" 790 F 



K> 



ÊÊÊmm 



Disquettes vierges 

□ à l'unité 

□ par 10 

Cassettes vierges C20 

U les 5 

□ les 10 



. 31 F 
275 F 



45 F 
80 F 



NOUVEAU: MODÈLE AVEC TÉLÉCOMMANDE!!! 




• Tête d'impression 9 aiguilles 

• Vitesse d'impression de 100 cps en mode listing 
et 16 cpsenNLQ 

• Niveau de bruit inférieur â 52 dB 

• Entraînement du papier par friction ou traction 

U imprimante SEIKOSHA SP 180 2190 F 



"Il ne lui manque que la parole", synthé. V0C1 la lui donne ' 
Très performant ce synthétiseur vocal va vous permettre 
de rendre votre ordinateur plus bavard qu'un politicien en 
campagne ! 

□ synthétiseur vocal 549 F 

! 7 logiciels vocaux sur disquette . 195F 



D interface TV (avec câble) 

D interface TV avec télécommande (avec câble). 



1 490 F 
1.690 F 




LOGICIELS PCW 



□ alienor 1095F 

□ guardian 170 F 

Qazerty 245F 

□ batman 185F 

□ blocus 185F 

□ bobwinner 240F 

Dbounder 205F 

□ bridgeplayer 195 F 

_cobol|not angl.l 550F 

□ campagnon 280 F 

□ compta. gène. (alphasoft)l 1 75 F 

□ damoclès 1750F 

□ datamatPCW 590F 

□ dbasell 790F 

□ enchanter 265F 

□ exbasic 250F 

□ fairliqht 160F 



□ force 4 + miss, detector . . 190 F 

□ frankbruno'sboxing 185F 

□ genecar 199F 

□ GPII + mailings 990F 

□ graphologie + biorythmes 1 99 F 
□heathrowaircontrol 180F 

□ histoire d'or 245 F 

□ infidel 265F 

□ la paie cresus 1175F 

□ langage "C"(not. angl.) .550F 

□ multiplan 498F 

□ mynea 830F 

□ orphée 275F 

□ PCWgraph 395F 

□ PCWpaint 350F 

□ polymail + polyword 460 F 

□ polyplot + polices n° 1 460 F 



□ polyprint + polyword . ..490F 

□ polyprogram 1185F 

□ quick mailing 790F 

□ SAS. raid 160F 

□ sam 290F 

□ seatalker 265F 

LJsorcerer 265 F 

Gspellbreaker 265 F 

□ spool 350F 

□ starglidBr 240F 

□ steve davissnooker 175 F 

□ strike force harrier 185F 

□ tassword8000 450F 

□ tomahawk 180F 

□ top secret 275 F 

□ trivial pursuit 230F 

[ J relate 350 F 



LOGICIELS PC 



G bob winner 245 F 

G échecs 3 D 210 F 

G grand prix 500 230 F 

G H.M.S. cobra 295 F 

G histoire d'or 250 F 



□ karma 230 F 

Q les passagers du vent . . 325 F 

D macadam bumper 299 F 

D marche â t'ombre 260 F 

D meurtres en série 295 F 



Gphalsberg 295 F 

Q prohibition 260 F 

D silent service 265 F 

Dsram 260 F 

D super tennis 255 F 







LIVRES — 








□ amstrad PCW guide basic 


146 F 


□ clefs pour amstrad PCW 


215F 


□ livre CP/M amstrad .... 


149 F 


□ amstrad à l'école 


120F 


Ucommu. mod. minit. CPC 149 F 


G livre lect. disq. CPC 


149F 


i . amstrad en famille 


145 F 


□ CP/M + amstr. CPC PCW 1 00 F 


□ tour de l'amstrad CPC... 


96 F 


□ amstrad et imprimantes . 


95 F 


□ gest. sur amstrad PCW 


175F 


□ routinesdei'amstradCPC 149F 


□ amstrad guide bas./ams. 


128F 


□ graphis. sons CPC 


129F 


□ logo sur CPC 


149 F 


□ amstrad locoscript 


110F 


□ je débute basic amstrad 


. 91F 


l J multiplan sur amstrad .. 


195F 


□ biendétr CPC61Z8 . . 


99 F 


□ l'assembl. de l'amstrad . 


105F 


□ musique sur l'amstrad .. 


148F 


□ biendétr. PCW 


129 F 


□ l'univers du PCW 


119F 


□ progr.éduc.surCPC 

□ trucs astuces pour CPC . . 


179F 


□ biendétr. PC 151 2 


149 F 


□ labibledugraph 


199 F 


149F 


□ clefspourmastradTI .. 


140 F 


□ labibleduprogr 


249F 


□ turbo pascal sur amstrad 


150 F 


□ clefs pour amstrad T2 


155F 


□ langage machine CPC . . 


129F 







C D 

acrojet ni 10 F D 1 50F 

algèbre4 s -3 e IZ1175F 1Z1Z45F 

amstrad gold hits II ... □ 1 1 51 □ 1 60 F 

analsofrome '. D125FD175F 

apprends moi à lire ,285F 

apprends moi à écrire . . CD225 F 

arkanoid D100Fni55F 

armymoves □ 1 00 F □ 1 50 F 

asphalt D135FD175F 

astérix potion mag IZ11 65 F D 1 99 F 

athlètes 0180 F □ 195F 

autoform.assembl □ 1 95t 0295 F 

ballbreaker nnSFOieOF 

barbarians ni05Fm45F 

basketball nnSFOieOF 

bobwinner C1185F IZ1240F 

bridge Q270FIZ13D5F 

budgetfamilial D140FD215F 

calcumat D450F 

canadair □ 1 1 F a 1 60 F 

carte de France □ 1 50 F □ 1 90 F 

cessna over Moscou ... □155FD215F 

cobol (notice angl ) □ 550 F 

colossuschess4 □! 10F □ 140F 



compacmove . 
contamination . 
convoy rider .. 
cosa nostra . . . 
d.a.m.s 



dame scanner 

danger street 

datamat 

dbasell 

démons. géom.4 e /3 e . . 

chiffres et lettres 

dessin 3d 

enduro racer 

équation inéqua. 4 e /2 B 
passagers du vent II . . . 

express rider 

FI 5 strikeeagle 

flash 

gauntlet 

grand prix 500 

graphie city 

h. I. m. cobra 

histoire d'or 



□ 210F 

□ 140F 

□ 115F 

□ 140F 

□ 295F 

□ 140F 

□ 135F 



□ 175F 

□ 210F 

□ 105F 

□ 175F 

□ 100F 
115F 

□ 140F 

□ 100F 

□ 150F 

□ 150F 

□ 299F 



D 

□ 260F 

□ 199F 

□ 160F 

□ 195F 

□ 395F 

□ 175F 

□ 165F 

□ 450F 

□ 790F 

□ 245 F 

□ 295F 

□ 255F 

□ 155F 

□ 245F 

□ 290F 

□ 145F 

□ 160F 

□ 180F 

□ 145F 

□ 180F 

□ 195F 

□ 299F 

□ 199F 



LOGICIELS CPC 



foot + tennis + 5 e axe 

hit pack n° 1 

hit pack n° 2 

hits ère vol. 1 

indoor sport 

k.y.a 

kid kit 

konami'scoinophits . 

la formule 

la geste d'artillac .... 

le nécromancien 

le passager dutemps . 

leader board 

les classiques vol. 1 .. 

les lauréats 

les maîtres du temps . 
les templiers d'orven . 

livingstone 

loto 

m'enfin 

macadam bumper .... 
marche à l'ombre .... 



C 

□ 160F 

□ 100F 

□ 105F 

□ 160F 

□ 115F 

□ 140 F 

□ 285F 

□ 110F 

□ 125F 

□ 199F 



□ 115F 

□ 160F 

□ 160F 

□ 180F 

□ 140F 

□ 130F 

□ 140F 

□ 145F 

□ 145F 



D 

□ 199F 

□ 140F 

□ 145F 

□ 240 F 

□ 155F 

□ 199F 
D285F 

□ 140F 

□ 199F 

□ 265F 

□ 170F 

□ 199F 

□ 160F 

□ 210F 

□ 165F 

□ 210F 

□ 220F 

□ 195F 

□ 190F 

□ 175F 

□ 245 F 

□ 199F 



massacre à la tomate . 
mastertronicdisq.n 1 
mastertronicdisq.n°2 
mastertronicdisq.n 3 

mercenary 

meurtres en série 

miamivice 

micro scrabble 

monopoly 

multiplan 

nemesis 

nitrogl. luckyluke 
pacman super pac ... 

paperboy 

prohibition 

rally2 

relief action 

rev./gre./cauld/sorc. . 

road runner 

samouraï trilogy 

sapiens 

shogun 

silent service 



C 

□ 125F 



□ 105F 

□ 265F 

□ 100F 

□ 210F 

□ 190F 

□ 95 F 



□ 110F 

□ 125F 

□ 160F 

□ 160F 

□ 160F 

□ 105F 

□ 110F 

□ 140F 

□ 120F 

□ 110F 



D CD 

□ 199F space harrier □ 1 05 F nt45F 

□ 99F starglider D150F OI80F 

□ 99F streethawk □110FD145F 

□ 99F taipan □ 1 1 F D 1 60 F 

□ 230 F tasword mailmerge . . . G360F 

□ 299F tennis3d ni20FD160F 

□ 150F tensions □125FD199F 

□ 255F textomat D450F 

□ 245F solda million n'1 .... □ 105 F (Z1150F 

□ 449F solda million n° 2 .... ni05Fm45F 

□ 145F solda million n° 3 □ 100FDH5F 

□ 220F thingbouncesback... Q105 F □ 1 55 F 

□ 150F topgun DlOOFnHOF 

□ 155F triohitpack □ 1 1 5 F □ 1 55 F 

□ 199F trivial pursuit □180FD215F 

□ 190 F tuer n'est pasjouer .... D120FD170F 

□ 199F valeurplusl.2 D3B5F 

□ 210F volleyball DH0FD175F 

□ 155F winchester ni50Fai80F 

□ 160F worldgames IZ1100F Q1 65 F 

□ 180F yiearkungfull IZ1100F 0155 F 

□ 165F zarkasatomic fiction .. m40Fni75F 

□ 160F zombi D145FG175F 



COMMENT COMMANDER -Cocher le(s) article(s) désiré(s) ou faites une liste sur feuille â part Faites le total + frais de port (20 F pour achats inférieurs à 500 F. 40 F de 500 à 1000 F. 60 F de 1000 F à 2000 F. 80 F pour achat supérieur à 2000 F| 
NOM ORDINATEUR □ PC 1512 U 61 28 coul. U 61 28 mono U 464 coul. i 464 mono i l 8256 m 8512 



ADRESSE . 



TEL. 



CODE POSTAL . 



VILLE 



Mode de paiement : U chèque / U mandat / U contre remboursement (prévoir 20 F de frais) - envoyer le tout à : ORDIVIDUEL, 20. rue de Montreuil 94300 VINCENNES. 
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INITIATION A CP/M 



Francis VERSCHEURE 



Nous voici donc arrivés à 
l'étude de la fonction 50, 
présente, rappelons-le, 
uniquement en CP/M Plus et 
destinée à un interfaçage 
"propre" avec le BIOS. Le 
mécanisme d'appel est très 
simple et utilise une zone 
de travail qui contient les 
différents paramètres dont 
voici la description : 

— 1 octet : numéro de la 
fonction BIOS à rappeler 

— 1 octet : contenu du 
registre A à passer au BIOS 

— 2 octets : contenu du 
registre BC 

— 2 octets : contenu du 
registre DE 

— 2 octets : contenu du 
registre HL 



En entrée : C = 50 DE = adresse de la 
zone de travail contenant les paramè- 
tres. 

En sortie : A contient le code retour 
éventuel de la fonction BIOS. 
Mais quelles sont les fonctions BIOS ? La 
figure 1 vous donne la liste utilisant les 
abréviations standard des noms de ces 
fonctions. Notre propos n'est pas de 
vous les décrire toutes, car d'ailleurs la 
plupart ne sont que des appels aux péri- 
phériques permettant d'effectuer physi- 
quement les fonctions du BDOS de 
CP/M. 

Nous allons voir dans le détail les fonc- 
tions du BIOS se rapportant aux opéra- 
tions sur disquettes, car celles-ci sont 
parfois utiles et ne font pas double 
emploi avec les fonctions du BDOS qui 
opèrent sur des fichiers. 

Les fonctions "disquettes" 
du BIOS 

HOME : positionne la tête de lecture du 
lecteur courant sur la piste 
SELDSK : sélectionne pour toutes les 
fonctions "disque" suivantes le lecteur 
qui sera concerné. Le numéro du lecteur 
est passé dans le registre C avec pour 
A:, 1 pour B: etc. 
Par précaution mettre B à zéro. 
Registre E à force la sélection, c'est- 
à-dire la relecture de la disquette. Indis- 
pensable pour ne pas avoir de problème 
lors d'un changement de support. 
Renvoie dans HL adresse table DPH du 
lecteur ou si erreur. 
SETTRK : sélectionne le numéro de piste 
passé dans le registre C 
SETSEC : sélectionne le numéro du sec- 
teur passé dans le registre C 
SETDMA : sélectionne l'adresse du 
transfert disque passée dans registre BC 
READ : lecture du secteur physique 
déterminé par numéro piste/numéro sec- 
teur à l'adresse passée par SETDMA. 
Code retour dans A. 
WRITE : écriture d'un secteur physique. 
Code retour dans A. 

Utilitaire simple 

de lecture/écriture physique 

d'une disquette 

La fonction 50 va nous permettre 
d'écrire simplement et proprement un 
petit programme qui, en liaison avec DDT 
ou SID nous permettra d'examiner une 
disquette en y accédant au niveau physi- 
que, c'est-à-dire piste/secteur. 



Rappelons le détail de cette organisa- 
tion : 

— une disquette comporte 40 pistes, 
numérotées de à 39 

— chaque piste est décomposée en 9 
secteurs de 51 2 octets. Quel que soit le 
formatage de la disquette, système 
CP/M ou données seules, pour le BIOS 
les secteurs sont toujours numérotés de 
à 8. 

Donc, chaque lecture vous permettra de 
visualiser 4 "secteurs CP/M" de 128 
octets. 

La figure 2 vous donne la liste du 
programme. 

Après avoir saisi le texte source, vous 
devez en effectuer l'assemblage par 
RMAC ou ASM, suivi du LINK ou du 
LOAD. Si vous n'avez pas fait d'erreur, 
les zones suivantes se trouveront aux 
adresses ci-dessous : 

DISQUE 226H 

PISTE 227H 

SECTEUR 228H 

BUFDSK 240H 

LECTURE 100H 

ECRITURE 109H 

FIN 10FH 

Comment maintenant utiliser cet utilitaire 
appelé, par exemple, DUMPDSK ? 
Il faut utiliser DDT ou SID. 
Voici la marche à suivre, l'exemple étant 
donné sous SID. 

SID DUMPDSK.COM chargement 
du programme en 100H 

S226 pour visualiser et modifier les 
valeurs des paramètres DISQUE, PISTE 
et SECTEUR. 

Puis G 1 00, 1 F pour effectuer une 
lecture ou 

G 109, 10 F pour une écriture. 
D230 vous visualisera le buffer conte- 
nant le secteur physique qui débute en 
240H et finit en 43FH. 

Précautions d'emploi : il est impératif, 
pour ne pas avoir de problèmes, de ter- 
miner l'utilitaire par un CTRL+SHIFT 
+ ESC pour effectuer un redémarrage 
à froid. 

Voilà, vous avez maintenant ce qu'il 
vous faut pour percer à jour les mys- 
tères du catalogue ou plus intéressant 
pour récupérer un fichier perdu. Bien 
sûr, rien ne vous empêche d'améliorer 
l'utilitaire pour le rendre indépendant. 

Bonnes découvertes, mais attention aux 
fausses manœuvres ! 
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Les fonctions du Bios de CP/M Plus. 



Numert 



Nom 



Ut i I i sat i 



BOOT 



WBOOT 



du systemei 



»st 



întir raS'E 



3 


CONST 


4 


CONIN 


5 


CONOUT 


G 


LIST 


7 


fiUXOUT 


S 


AUX IN 


9 


HOME 


10 


SELDSK 


11 


SETTRK 


12 


SETSEC 


13 


9ETDMA 


14 


REfiD 


15 


WRITE 


1E 


LISTST 


17 


SECTRN 


18 


CONOST 


19 


AUXIST 


20 


AUXOST 


21 


DEVTBL 


22 


DEVINT 


23 


DRVTBL 


24 


MULTID 


25 


FLUSH 


26 


MOVE 


27 


TIME 


28 


SELMEM 


29 


SETBNK 


30 


XMOVE 


31, 32 


33 Reserve 



Initial i sat i on tota l 

f roi d. 

"Warm Boot", c'est a dire démarrage a chaud. Cor'-espor 

reinitial i sat i on partiel le du système et retour au CCF 

Etat de la console renvoyé dans le registre fi. 

Lecture d'un caractère au clavier et stockage riar 

Ecriture du caractère contenu dans fi a l'écran. 

Ecriture sur imprimante du caractère contenu dans P. 

Ecriture fi vers périphérique auxiliaire. 

Lecture dans fi du périphérique auxiliaire. 

Retour tête lecteur courant sur Piste 2. 

Sélection lecteur courant. 

Sélection numéro de Piste. 

Sélection numéro de secteur. 

Fixe l'adresse des transferts disque. 

Lecture d'un secteur. 

Ecriture d'un secteur. 

Etat de I" imprimante dans fi. 

Conversion numéro secteur logique en physique. 

Etat console, en sortie. 

Etat port auxi I iai re en entrée. 

Etat port auxiliaire en sortie. 

Adresse table des périphériques. 

Initialisation d'un périphérique. 

Adresse table des disques. 

Positionne compteur mu 1 1 i -secteur. 

Force écriture des tampons. 

Recopie d'un bloc mémoire. 

Gestion heure/date. 

Sélectionne banc de mémoire contenu dans fi. 

Fixe banc de mémoire pour transferts disque. 

Mouvement d'un banc vers un autre. 



Utilitaire disque pour CP/M Plus. 



BDOS 


equ 


5 


PRINTS 


equ 


9 


BIOSCftLL egu 
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SELDSK 


equ 


9 


SELTRK 


equ 


10 


SELSEC 


equ 


11 


SELDMfl 


equ 


12 


RDSECT 


equ 


13 


WRSECT 


equ 


14 


Lecture 


. 






cm i i 


In i tParms 




cz 


ReadSector 




j mp 


Fin 


Ecriture: 






cal l 


I n i tParms 




cz 


Wr i teSector 


Fin: 


rst 


T 


In i tParns: 






mv i 


c. BIOSCftLL 




mv i 


a. SELDSK 




sta 


BIOSF 




Ida 


DISQUE 




sta 


BIOSBC 




xra 


a 




sta 


BI0SBO1 




sta 


BIOSDE 




l xi 


d. BIOSF 




cal 1 


BDOS 




mov 


a, h 




or» 


l 




jnz 


DisaueOk 




1 xi 


d, MSGERR1 


Error : 








mv i 


c, PRINTS 




cal 1 


BDOS 



Affichage d'une chaîne 
Fonction BDOS fippel BIOS 
sélection de disque 
sélection de Piste 
sélection secteur 
sélection adresse buf fer 
lecture secteur 
écriture secteur 



In i t i al i se les pa ramet ri 
et lecture d'un secteur 
s. OK 



! Retour a DDT ou SID 

! Init Disque. Piste et Secteur 

! sélection disque 

! d i sque ds C 

I (9 de B 

; ds E sélection forcée 

î adresse des paramètres 

! teste si pas d'erreur 

î unité non disponible 

î af f i che' message d'erreur 

! et term i ne 
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mv i 


a. 1 


orj 


a 


ret 




Di squeOk : 




mv i 


a. SELDMA 


sta 


BIOSF 


l x i 


h, BUFDSK 


Shl d 


BIOSBC 


mv i 


c, BIOSCflLL 


l x i 


d, BIOSF 


cal l 


BDOS 


mv i 


a, SELTRK 


sta 


BIOSF 


l da 


PISTE 


sta 


BIOSBC 


xra 


a 


sta 


BICSBC+1 


mv i 


c. BIOSCflLL 


1 xi 


d.BIDSF 


cal i 


BDOS 


Ida 


SECTEUR 


sta 


BIOSBC 


xra 


a 


sta 


BIOSBC+1 


mv i 


a, SELSEC 


sta 


BIOSF 


mvi 


c, BIOSCflLL 


l xi 


d, BIOSF 


cal i 


BDOS 


xra 


a 


ret 




ReadSector : 




mv i 


a, RDSECT 


sta 


BIOSF 


mv i 


c, BIOSCflLL 


1 x i 


d, BIOSF 


cal 1 


BDOS 


or a 


a 


J z 


Read IsOk 


1 x i 


d, MSGERR2 


JMP 


Er ror 


ReadlsOk: 




ret 




Wr i teSector : 




mv i 


a. WRSECT 


sta 


BIOSF 


1 x i 


h, 1 


Shl d 


BIOSBC 


mv i 


c, BIOSCflLL 


l x i 


d, BIOSF 


cal 1 


BDOS 


ora 


a 


j z 


Wr i telsOk 


1 Xi 


d, MSGERR3 


jmp 


Erro r 


Wr i telsOk: 




ret 





positionne code erreur 



Positionne adressa 
transfert disaue 



Sélectionne 19 Pist- 



pi ste ds BC 



Sélectionne le secteur 



Lecture d'un secteui 



teste le 



Ecriture d'un secteur 



•c r i tu re i nwied i ate 



teste le code retour 



Zones de données déclarées expi 



c i tement 



MSGERR1 


: db 


' 


MSGERR2 


: db 


' 


MSGERR3 


■ db 


' 


DISQUE: 


db 





PISTE: 


db 





SECTEUR 


: db 





BIOSF: 


db 





BIOS»: 


db 





BIOSBC: 


dw 





BIOSDE: 


dw 





BIOSHL: 


dw 
db 





BUFDSK : 


db 






Cette unité de Disaue n' ' est pas en i i sne' ■ BfiHi 0DH> ' î>' 
Lecture de ce secteur i tnposs i b I e' * BAH, 0DH, ' *' 
Ecriture de ce secteur i mposs i b l e' , 0RH, BDH. ' *' 



Disk Buffer 



END 
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*>■ 






BRETAGNE 
EDIT PRESSE 



O 



Vente Par Correspondance 



y 



, i<<i 



CONFIANCE 



Ifcw*/ «ZM# 



QUALITE 



SERVICE 



Le développement de la vente par 
correspondance est un fait que nul ne 
conteste désormais. Il repose sur 2 points 
essentiels : la confiance client- 
fournisseur et la qualité des produits 
proposés. 

L'explosion de ce type de commerce est 
souvent dû aux difficultés de 
déplacement des clients. De son côté, le 
fournisseur peut réduire ses marges, donc 
ses prix. 

Pour réussir, il faut l'appui d'un groupe 
servant de support et de garantie. C'est 
ce que nous avons fait. 




S'évader dans un fauteuil 



D Le clan de la caverne des ours 

(Archer) 73,00 

D La Virginienne 

( Chase- Riboud) 105,00 

D L'or de la terre 

(Clavel B.) 90,00 

D La lettre à Alexandrine 

(Decours D.) 105,00 

D La bicyclette bleue 

(Oeforge R.) 90,00 

n 101 avenue Henri Martin 

(Oeforge R.) 95,00 

n Le Diable en rit encore 

(Deforge R.) 115,00 

D La Bougainvillée - Le jardin 

du Roi (T1) (Deschamps F.) 115,00 
D La Bougainvillée ■ 4 épices (T2) 

(Deschamps F.) 120,00 

D La marquise des ombres 

(Hermany-Veille) 98,00 

D Fontbrune (Le Varlet B.) . . . 11 5,00 
D La splendeur des orages 

(Plain B) 118,00 

D Tous les fleuves vont à la mer 1 05,00 
D Tendre et violente Elisabeth 

(Troyat H.) 80,00 

D Les mangeurs d'âmes 

(Wouk H.) 98,00 

D La télé rend fou... 

mais je me soigne (Masure B.) 65,00 
D Elle qui ne sait pas dire je 

(Pelot P.) 90,00 

D Gauguin, le bon Dieu 

n'a pas d'oreilles (Berner P.) 100,00 
D Pour une parcelle de gloire 

(Bigeard M.) 110,00 

n Nous avons rencontré 

les prophètes d'aujourd'hui 

(Cartier J.P.) 100,00 

D Le banquier du Vatican 

(Corwell R.) 75,00 

D Joseph Kessel ou Sur la piste 

du lion (Courrière Y.) 160,00 

D Des Toques et des Etoiles 

(Courrière Y.) 140,00 

D La vérité blessée 

(Couturier Y.) 100,00 



D Des pierres précieuses 

aux pierres fines (album) 

(Dacunna) 135,00 

D Les Rois Maudits (T 1) 

(Druon M.) Reliure Skivertex 95,00 

n Les Rois Maudits (T 2) 

(Druon M.) Reliure Skivertex 95,00 

D Les Rois Maudits (T 3) 

(Druon M.) Reliure Skivertex 95,00 

D Les Rois Maudits (T4) 

(Druon M.) Reliure Skivertex 95,00 

D Les Rois Maudits (T 5) 

(Druon M.) Reliure Skivertex 95,00 

D Les Rois Maudits (T 6) 

(Druon M.) Reliure Skivertex 95,00 

D Si j'étais Dieu (Guth P.) ... 75,00 

D Mœurs et sexualité en Océanie 

(Mead M.) 90,00 

D Tapie, les secrets 

de sa réussite (Musnik) .... 90,00 
D Terre vivante : voyage 

d'un agronome autour 

du monde (Dumont R.) 100,00 

D Le cheval d'orgueil Mémoires: 

d'un breton du Pays Bigpuden 

(Hélias P.J.) 100,00 

D Le quartier de la mort 

(Jackson B. Christian D) . . . 130,00 
□ La merveilleuse histoire 

du cirque (Thétard H.) 150,00 

D La difficulté de vivre 

(Françoise Dolto) 95,00 

D La solitude 

(Françoise Dolto) 110,00 

D Mes animaux vedettes 

(Marlyse de la Grange) 130,00 
D Les salons de Marie 

(Marie Jaoul de Porche ville) 85,00 




D Portrait total de Mitterrand 

(P. Jouve A. Magoudi) .... 89,00 
D L'immortelle 

(Amanda Lear) 85,00 

D Argotez, Argotez 

(Auguste Lebreton) 96,00 

D Confidence de Femme 

(Sophia Loren) 125,00 



Maintenant !... 
Je peux les recevoir 







D La cuisine est un jeu 

d'enfant (Oliver M.) 100,00 

D La pâtisserie est un jeu 

d'enfant (Oliver M.) 85,00 

D Les hors d'oeuvre sont 

un jeu d'enfant (Olivier M.) . 85,00 
D Mes nouvelles recettes 

à la télé 80,00 

n Mes dernières recettes 

à la télé 90,00 

D Les grands vins de France 

(Dovaz M.) 180,00 

D La cuisine au naturel 

(Dard P.) 100,00 



D La cuisine traditionnelle 

(Duclous J.) 110,00 

D Tous les vins de Bordeaux 

(Duiker) 120.00 

D Le grand livre des vins 

de France (Mastrojannim) . . 140,00 
D Ma médecine naturelle 

(Rika Zarai) 76,00 

D Dictionnaire des médicaments 

vendus sans ordonnance 

(Giroud J.C et Dr. Hagége) . 120,00 
D Se soigner seul sans danger 

Dictionnaire conseil des 

médicaments vendus sans 

ordonnance 1 30,00 

D La grande manipulation 

(Vallée J.) 75,00 

D La spasmophilie enfin vaincue 

(Verret P.) 70.Q0 

D La science de l'homéopathie 

(Vithoulkas G.) 120,00 

D Perfectionnez-vous aux échecs 

La maîtrise du premier degré 

(Youdowitch MM.) 95,00 

D Guide des mots croisés 

et du scrabble (Zakhiaf) . . . 160,00 

D Ciné télé guide 85,00 

D J'irai cracher sur vos tombes 

(Boris Vian) 70,00 

D Jean de Florette, suivi de 

Manon des Sources 

(M. Pagnol) 100,00 

D En désespoir de cause 

(Robert Hossein) 85,00 

D Femme Public (Alice Sapritch) 75,00 
D Le mythe de la vie 

(Ingrid Bergman) 95,00 

D La route des Indes 

(E.M. Forster) 80,00 

D Jean de Florette, suivi de 

Manon des Sources (Relié) 

(Marcel Pagnol) 150,00 

D Les films de Marcel Pagnol 

(Castans R. et Bernard A) . 120,00 



Astrologie, Esotérisme 



D 



D 



D 



D 



D 



□ 



D 



La Bourse et l'Astrologie 

Manuel d'astrologie boursière 95,00 

Les cycles astrologiques 

de la vie (Arroyo S.) 120,00 

L'Astrologie, la psychologie 
et les quatre éléments 

(Arroyo S.) 80,00 

Astrologie pratique simplifiée 

(Cluny J.) 60,00 

Le véritable sens des maisons 
astrologiques (Dorsan J.) . . . 85,00 

Combinaisons des influences 

astrales (E. Bertin) 87,00 

La vérité sur l'Astrologie 

(Gauquelin M.) 120,00 



D Comment comprendre votre 

horoscope (T 1) (Holley G). . 

Comment comprendre votre 

horoscope (T 2) (Holley G) . . 

L'Astrologie à la recherche 

des clés de la destinée . . . . 



D 



D 



65,00 
60.00 
90,00 




D L'Astrologie de 

la Transformation (Rudhyard) 85,00 
D Le cycle de la lunaison 

(Rudhyard) 60,00 

D La dimension galactique 

de l'Astrologie (Rudhyard) . . 80,00 
D Les maisons astrologiques 

(Rudhyard) 90,00 

D Retour de l'Absolu (Rudhyard) 85,00 
D Le rythme du zodiaque 

(Rudhyard) 60,00 

D La triptique astrologique 

(Rudhyard) 120,00 

D Les aspects astrologiques 

(Rudhyard) 89,00 



□ 



D 



D 



D 



D 



□ 



a 



□ 



a 



a 



D 



a 



a 



a 



D 



Dynamique des aspects 

astrologiques (Tierney B.) . . 120,00 

Comment devenir voyant 

(M. Bigiani et F. Dollet) . . . 76,00 

La Dianétique (Ron Hubbard) 85,00 

L'Atlantide retrouvée : 

Le huitième continent 

(Berlitz C.H.) 75,00 

Guide de la Comète de Halley 

et le phénomène mystérieux 

des comètes (Asimov I.) . . . 78,00 

La biologie de l'esprit 

(Chauvin R.) 78,00 

Histoire du spiritisme 

(Conan Doyle A.) 100,00 

Loge souveraine ou 

loge esclave (vérité, mensonges 

de la Franc-Maçonnerie) 

(Dangle P.) 75,00 

La voix de la vallée, 
l'enseignement d'un maître Zen 

(Des Himaru) 85,00 

Les livres secrets 

des Gnostiques d'Egypte 

(Doresse J.) 75,00 

Les couleurs visibles 

et non visibles (Duplessis Y.) 100,00 

Pratique de l'expérience 

spirituelle (Durckheim K.G.) . 90,00 

L'univers inconnu du Tarot 

(Grand R.) 150,00 

Psychologie transpersonnelle 

(Grof) 115,00 

L'Alchimie de la vie, biologie 
et tradition (Guillé E. et 

Hardy Ch.) 85,00 

Le monde à l'envers : comment 
retrouver les lois de la vie 

(Meglin AJ 79,00 

La perversion mathématique 

L'œil du pouvoir (Upinsky) . . 100,00 

Mystique sacrée, mystique 

profane (Zaehner R.C.) 100,00 

Les secrets du Tarot 

divinatoire, 1 jeu + 1 livre. 120,00 
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AMSTRAD PC 1512 



BIEN DEBUTER SUR PC 1512 

Ce livre s'adresse à ceux qui veulent rapidement 
profiter de leur PC 1512. Apprenez comment 
travailler sous GEM. Utilisez GEMPAINT - Fonc- 
tions principales du DOS - Réalisez vos premiers 
programmes en BASIC 2. Réf : R.274 
Prix : 149 F 

LE LIVRE DE PC 1512 

Ce livre est conçu comme un guide. Vous trou- 
vez des réponses. Comment est-il vraiment com- 
patible ? Qu'est-ce que DOS/PLUS. GEM et MS- 
DOS ? - Quels sont les logiciels disponibles ? - 
Quelles sont les extensions possibles ? 
Réf: R.271 - Prix : 99 F 

D GUIDE DE REFERENCE TECHNIQUE 
DU PC 1512 

Ce guide a été spécialement écrit par l'équipe 
de développement d'AMSTRAD International. Il 
vous dévoile toutes les caractéristiques de votre 
PC 1512 : organisation de la mémoire. DMA : 
interruptions systèmes, contrôleur VDU couleur 
alpha/graphique, FDC, port sériel R 232 C, port 
parallèle d'imprimante. Interface et connexions, 
interruptions ROS, RAM non valide. Réf : R.259 
Prix : 249 F 

D TRUCS ET ASTUCES DU PC 1512 

Comment tirer parti du DOS, de GEM, du BASIC 
2 et des autres langages fonctionnant sur PC 
1512. Parmi les programmes - Générateur de 
programmes, redéfinition du clavier, graphismes 
en 3 D, animations graphiques RAMDISK. 
Réf: R.275 Prix: 179 F 

D LE LIVRE DU BASIC 2 

Très complet, cet ouvrage permet aux program- 
meurs de tous niveaux de trouver l'information 
recherchée facilitant l'apprentissage et la pro- 
grammation en BASIC 2. Réf : R.214 - 
Prix : 179 F 

D CLEFS POUR PC ET COMPATIBLES 

Indispensable au programmeur pour accéder rapi- 
dement à toutes les informations. Réf : P. 342 
Prix : 195 F 

□ GLEM SUR AMSTRAD PC 

Constitue une découverte complète et progres- 
sive de GEM : GEM Paint, GEM Write, GEM 
Graph, GEM Wordchart. Réf : P.380 - 
Prix : 185 F 

D CLEFS POUR GEM SUR AMSTRAD PC 

Ce livre s'adresse aux utilisateurs avertis d'AMS- 
TRAD PC désireux de programmer leurs propres 
applications graphiques sous GEM. Réf : P.389 
Prix : 195 F 



DIVERS COMPATIBLES 



D DICTIONNAIRE AU BASIC IBM 

D.A. LIEN 
C'est la référence de base du langage BASIC 
Microsoft (PC et COMPATIBLES). Réf : P.260 
Prix : 195 F 



D 8088 ASSEMBLEUR IBM PC 

H. LILIEN 
Regroupe trois livres en un seul : un cours d'ini- 
tiation, un manuel de l'utilisateur, un guide pra- 
tique. Réf: R.121 - Prix : 250 F 

D 8088 ET SES PERIPHERIQUES 

H. LILIEN 
Ce livre est consacré aux microprocesseurs 8088 
et 8086 et à leurs principaux circuits périphéri- 
ques d'accompagnement, tels qu'ils sont 
employés dans les micro-ordinateurs PC d'IBM 
et Compatibles. Réf : R.68 - Prix : 1 50 F 

D ECRIRE EN DBASE II ET III 

C. MICHEL 
Apprendre à développer en dBASE des applica- 
tions structurées avec des menus, des saisies 
de données, des traitements, des rapports. 
Réf: P.06 Prix : 185 F 

a MS DOS PAS A PAS (version 2 et 4) 

A. PIN AU 
Apprendre les commandes du système d'exploi- 
tation MS-DOS en les pratiquant, tel est le but 
de cet ouvrage. Réf : P.382 - Prix : 1 35 F 

n PC, MODEMS ET SERVEURS 

A. MARIATTE 
Apprend aux utilisateurs avertis d'IBM PC/X/AT 
à se servir d'un MODEM, à utiliser ou créer un 
logiciel de communication, à tout savoir sur les 
réseaux télématiques. Réf : P.339 - 
Prix : 210 F 

D INTRODUCTION A DBASE III 

A. SIMPSON 
Permet au lecteur même débutant d'apprendre 
la programmation sans difficulté, en réalisant les 
exemples proposés. Réf: S.0131 - 
Prix : 210 F 

D PRATIQUE DES IBM (II) 
ENCYCLOPEDIE BASIC 

H. LILIEN 
Encyclopédie BASIC à double accès traitant la 
programmation avancée, les fichiers, le graphi- 
que et la couleur, ainsi que la musique et les sons. 
Indispensable pour éviter les recherches fastidieu- 
ses et les pertes de temps. Réf: R.165 
Prix : 220 F 

D DU BASIC AU TURBO PASCAL 

Comment développer sous Turbo des routines cor- 
respondant à des programmes BASIC. 
Réf: R.211 ■ Prix : 199 F 

D LE LIVRE DE FRAMEWORK 

R. COHEN 
Le tableau, le gestionnaire de loisirs, le généra- 
teur de graphiques, l'accès DOS, le logiciel de 
communication et FRED : le langage évolué. Indi- 
que aussi la manière de relier le PC au monde 
extérieur. Réf : P.258 - Prix : 1 50 F 

D MS-DOS APPROFONDI 

J. KAMN 
Pour les utilisateurs expérimentés de MS-DOS 
(version 2.1 à 3.1), cet ouvrage a pour but de 
vous familiariser avec les techniques les plus évo- 
luées permettant d'accroître votre productivité. 
Réf : S.227 • Prix : 278 F 



n Nouveau! PRATIQUE DES IMPRIMANTES 

M. ARCHAMBAULT 
Apprendra aux amateurs comme aux profession- 
nels à résoudre les mille et un problèmes qu'ils 
ne manqueront pas de rencontrer lors de la mise 
en service de leur imprimante. - Prix ': 95 F 

n LES SECRETS DU MINITEL 

C. TAVERNIER 
Principaux chapitres : les différents services pro- 
posés sur Télétel : informatique domestique et 
Minitel, téléphonie et transmission d'information, 
différents principes de transformation de données, 
comment devenir serveur. Réf : R 491 
Prix :115F 

D SYSTEME D'EXPLOITATION 
ET LOGICIEL DE BASE 

P. JOUVELOT, LE CONTE DES FLORIS 
Moniteurs et systèmes d'exploitation monotâche 
CP/M, MS-DOS, système d'exploitation multitâ- 
che, les couches d'un système d'exploitation ; 
Unix, présentation et analyse ; les utilitaires : ges- 
tion de fichiers, assembleurs, éditeurs de liens. 
Réf : R.482 - Prix : 95 F 

n CONSTRUISEZ VOS ALIMENTATIONS 

J.-C. ROUSSEZ 
Schémas échelle 1 : transformateur, redresse- 
ment, filtrage, dissipation de la chaleur, alimen- 
tations non régulées, multiplicateurs de tension, 
alimentations régulées, alimentations à décou- 
page. Réf : R.463 - Prix : 70 F 

D 100 LOGICIELS PUBLICS SUR PC 

J.-F. SEHAN 
Ce livre s'adresse à deux catégories d'utilisa- 
teurs : ceux qui disposent déjà de logiciels du 
domaine public non documentés et ceux qui sou- 
haitent les découvrir. 100 logiciels aussi bien uti- 
litaires que jeux. Réf : P.387 - Prix : 1 45 F 

D CLEF POUR MS DOS (versions 2 à 4) 

Y. DARGERY 
Accessible à tous les utilisateurs d'IBM, PC ou 
Compatibles. Permet d'avoir sous la main tou- 
tes les informations concernant les commandes 
des différentes versions de MS-DOS (version 4 
incluse) et divers outils de programmation avan- 
cée. Il donne également de nombreuses astuces 
d'utilisation. Réf: P.384 - Prix : 185 F 



LANGAGES 



D INITIATION BASIC (niveau 1) 

H! LILIEN 
Le BASIC ? ... Mais c'est très simple ! Ce livre 
vous en convaincra comme il a déjà convaincu 
les dizaines de milliers de lecteurs qui en ont fait 
le "bestseller" de la micro-informatique. 
Réf: R.52 - Prix : 125 F 

□ INITIATION BASIC (niveau 2) 
Programmation structurée 

F. CROCHET, D. VILAIN 
Cette représentation originale, véritable synopti- 
que de l'application, accessible à tous, même aux 
débutants, vous permet de réaliser des program- 
mes particulièrement structurés. Une grande par- 
tie est consacrée à la gestion des fichiers BASIC 
à accès séquentiel direct ou séquentiel indexé. 
Réf: R.158 - Prix : 160 F 







D INITIATION AUX FICHIERS BASIC 

J. BENARD 
Avec ce livre, vous découvrirez progressivement 
le "mécanisme" de la constitution d'un fichier 
en BASIC Microsoft, puis de son exploitation. 
Réf: 189 - Prix : 115 F 

D INTRODUCTION AU TURBO PASCAL 

D. STIVISON 
Cet ouvrage permettra à l'utilisateur d'exploiter 
la puissance exceptionnelle de ce langage. 
Réf: S.0180 - Prix : 198 F 

D LE BASIC ET SES FICHIERS 

J. BOISGONTIER 
Tome 1 ■ Ce premier tome s'adresse à tous les 
programmeurs initiés au BASIC qui souhaitent 
réaliser des applications utilisant des fichiers sur 
disquette ou sur disque. Ils découvriront la ver- 
sion 5.1 du BASIC Microsoft et apprendront à 
l'employer au mieux sous PC DOS ou MS-DOS. 
Réf: P.246 - Prix : 110 F 

D LE BASIC ET SES FICHIERS 

J. BOISGONTIER 
Tome 2 - Ce second tome est destiné aux pro- 
grammeurs disposant d'un BASIC Microsoft fonc- 
tionnant sous PC-DOS ou MS-DOS. Le corps de 
l'ouvrage est consacré à des programmes utili- 
taires : générateurs de saisie d'écran, tri rapide 
ou à des programmes de gestion (facturation) 
Réf: P.250 - Prix : 105 F 



CPC 464 664 6128 • PCW 



D LE LANGAGE MACHINE 
DE L'AMSTRAD CPC 

Plus loin que le BASIC. Des bases de la program- 
mation en assembleur à l'utilisation des routines 
système, nombreux exemples. Contient un pro- 
gramme assembleur, moniteur et désassembleur. 
Réf: R.228 - Prix : 129 F 

D LE LIVRE DU LECTEUR DE DISQUETTE 
AMSTRAD CPC 

La programmation et la gestion des données avec 
le 6128, le DO 1 ou le 664 ! Utile au débutant 
comme au programmeur en langage machine. 
Contient un listing du DOS commenté, un utili- 
taire qui ajoute les fichiers RELATIFS à l'AM- 
DOS avec de nouvelles commandes BASIC, un 
MONITEUR disque et beaucoup d'autres program- 
mes et astuces... Réf : R.232 - Prix : 149 F 

LA BIBLE DU CPC 664/6128 

Tout connaître sur les CPC 6128 et 664. Analyse 
du système d'exploitation, du processeur, le GATE' 
ARRAY, le contrôleur vidéo, le 8255, le chip 
sonore, les interfaces. Réf : R.250 
Prix : 199 F 

D MIEUX PROGRAMMER EN ASSEMBLEUR 

T. LACHAND-ROBERT 
Méthodes de programmation en assembleur Z80, 
accompagnées de nombreux exemples de pro- 
grammes d'application fonctionnant sur les Ams- 
trad CPC 464, 664 et 6128. Réf: S.0193 
Prix : 148 F 



D MONTAGES, EXTENSIONS 
ET PERIPHERIQUES AMSTRAD CPC 

Tout ce que peut réaliser un amateur d'électro- 
nique avec un CPC. Interfaces, programmateur 
d'EPROM... Un très beau livre de 450 pages. 
Réf: R.235 - Prix : 199 F 

D TECHNIQUES DE PROGRAMMATION 
DES JEUX EN ASSEMBLEUR 

G. FAGOT-BARRALY 
Cet ouvrage contient des programmes de jeux 
écrits pour les ordinateurs Amstrad CPC 464, 
664 et 6128. Chaque programme est accompa- 
gné d'une analyse pédagogique de la structure 
des phases essentielles et de tableaux résumant 
la fonction et les valeurs des principales varia- 
bles. Réf : S.208 - Prix : 98 F 

D GRAPHISME EN ASSEMBLEUR 
SUR AMSTRAD CPC 

F. PIEROT 
Programmer des applications graphiques en 
assembleur sur Amstrad (464, 664, 6128). De 
nombreuses routines. Réf : P.340 - 
Prix : 145 F 

D AMSTRAD EN MUSIQUE D. LEMAHIEU 
Pour les amateurs déjà initiés au langage BASIC, 
traduction d'oeuvres musicales sur Amstrad. Par- 
tant de la génération de sons, en passant par 
le synthétiseur musical programmable. 
Réf: P.324 - Prix : 165 F 

D RSX ET ROUTINES 
ASSEMBLEUR SUR AMSTRAD 

D. ROY, J.-J. WEYER 
De très nombreux programmes de graphismes et 
de mathématiques permettront aux possesseurs 
d'Amstrad d'améliorer leurs connaissances en 
assembleur Z80. Réf : P.352 - Prix : 200 F 

D MIEUX PROGRAMMER SUR AMSTRAD 

M. ARCHAMBAULT 
Complément pratique du manuel d'origine. L'art 
de concevoir et de créer un programme d'une 
manière efficace. Multiples astuces. Explique clai- 
rement certains points obscurs du manuel d'ori- 
gine. - Prix : 85 F 

D PROGRAMMES UTILITAIRES 
POUR AMSTRAD 

M. ARCHAMBAULT 
Nombreuses routines : utilitaires de programma- 
tion, utilitaires graphiques, la gestion de fichiers, 
utilitaires imprimantes. - Prix : 85 F 

D APPRENEZ L'ELECTRONIQUE 
SUR AMSTRAD 

P. BEAUFILS, B. DESPERRIER 
Programmes permettant de visualiser les phéno- 
mènes complexes de l'électronique. 
Prix : 95 F 

D LA BIBLE DU PROGRAMMEUR 
DE L'AMSTRAD CPC 

Ce livre est l'ouvrage de référence pour tous ceux 
qui veulent programmer en pro. Organisation de 
la mémoire, le contrôleur vidéo, les interfaces, 
l'interpréteur de toute la ROM désassemblée et 
commentée, etc. Réf : R.226 - Prix : 249 F 



D COMMUNIQUEZ AVEC AMSTRAD 

D. BONOMO, £ DUTERTRE 
Pour tous les passionnés d'ondes courtes, codage, 
décodage, réception/émission, interfaces. 
Prix : 90 F 

D 102 PROGRAMMES 
POUR AMSTRAD CPC 

J. DECONCHAT 
Idéal pour débutants, pour guider le lecteur dans 
l'exploration du BASIC AMSTRAD. Les program- 
mes à recopier sont classés par niveaux, chacun 
d'eux faisant appel à de nouvelles connaissan- 
ces. Réf: P.222 Prix : 120 F 

D AMSTRAD A L'ECOLE 

D. NIELSEN, G. AMPUDIA 
Destinés aux enseignants, parents et élèves : le 
calcul, le français et l'éveil. Un cahier de vacan- 
ces permet aux enfants de concevoir eux-mêmes 
de petits programmes. Réf : P.343 - 
Prix : 120 F 

D BASIC PLUS DE 80 ROUTINES 
SUR AMSTRAD 

M. MARTIN 
L'auteur propose 80 routines pour simuler des 
fonctions qui n'existent pas directement sur la 
machine. Le lecteur doit déjà connaître le BASIC 
de l'AMSTRAD CPC pour utiliser au mieux cet 
ouvrage. Tél. P.286 - Prix : 100 F 

D PERIPHERIQUES ET FICHIERS 
SUR AMSTRAD CPC 

D.J. DAVID 
Les ordres correspondant à chacun des périphé- 
riques sont présentés : lecteurs de cassettes et 
de disquettes, imprimantes, crayon optique, 
manette de jeux et RS232. La programmation 
des disques est étudiée en accès séquentiel à 
l'aide d'ordre BASIC et en accès direct à l'aide 
de routines originales. Réf: P.316 - 
Prix : 120 F 

D BASIC AMSTRAD 1 (méthodes pratiques) 

J. BOISGONTIER 
Jeu d'instructions très complet : gestion des inter- 
ruptions en BASIC, sortie stéréo au haut-parieur 
intégré, etc. Réf: P.230 Prix : 105 F 

D BASIC AMSTRAD 2 

(programmes et fichiers) 

J. BOISGONTIER 
Programmes graphiques utilisant la haute réso- 
lution ainsi que la gamme couleurs. Programmes 
de gestion de fichiers pour Mailing, étiquettes, 
créations d'histogrammes. Jeux à exécution très 
rapide. Programmes éducatifs. Réf: P.249 
Prix : 95 F 

D TURBO PASCAL SUR AMSTRAD 

B. BRANDEIS, F BLANC - CPC et PCW 
Toutes les commandes sont expliquées et illus- 
trées pour arriver à un haut niveau de connais- 
sances : faire de l'assembleur à l'intérieur des 
routines Pascal, connaître le fonctionnement de 
Heap et de Pile, maîtriser les pointeurs etc. 
Réf: P.310 - Prix : 135 F 






O SUPER GENERATEUR DE CARACTERES 
SUR AMSTRAD 

J.-P. SEHAN 
Propose un programme original de création de 
caractères graphiques qui peuvent être utilisés 
tels quels pour illustrer des programmes de jeux 
ou modifiés au gré de l'imagination du lecteur. 
Réf: P.300 • Prix : 140 F 

D TRUCS ET ASTUCES T1 
POUR AMSTRAD CPC 

Graphismes, fenêtres, langage machine... Ses 
super programmes sont inclus (gestion de fichiers, 
éditeurs de textes et de sons). Réf : R.221 
Prix : 149 F 

D TRUCS ET ASTUCES T2 POUR CPC 

Vous y trouverez un générateur de menus, de 
masques, des aides à la programmation comme 
un DUMP etc. Réf: R.221 • Prix : 129 F 

D LES ROUTINES DE L'AMSTRAD CPC 

Pour bien connaître et utiliser les routines utiles 
du 6128, 664 et 464. A la portée de tous. Nom- 
breux programmes utilitaires. Réf : R.239 
Prix : 149 F 

D DEBUTER AVEC LE CPC 6128 

Tout est clairement expliqué, aussi bien pour le 
matériel que pour le logiciel. Réf :-R.248 
Prix : 99 F 



D Nouveau ! COMPILATION CPC 

Numéros 1, 2, 3, 4 - Prix : 70 F 



D LA BIBLE DU GRAPHISME 

Tout sur le GSX. Programmation d'un logiciel 
PAINT graphismes de gestion, graphismes vec- 
torisés, fonctionnement et réalisation d'un light 
pen. Graphisme en langage machine, tout sur le 
graphisme CPC et CPW. Réf : R.227 
Prix : 199 F 

D LE GRAND LIVRE DU BASIC CPC 6128 

Ce livre vous permet d'exploiter à fond les capa- 
cités du BASIC LOCOMOTIVE. Attaquer les dif- 
férents domaines de la programmation : tris, fenê- 
tre, protection, sons et musique, mémoire de 
masse avec l'AMOOS et le RAMDISK. Nombreux 
listings d'application de haut niveau, fournis et 
commentés. Réf: R.268 - Prix : 149 F 

□ PROGRAMMER 
VOTRE TRAITEMENT DE TEXTES 

J.-C. DESPOINE 
Traitement de textes présenté pour l'essentiel en 
assembleur. Pour 464, 664 et 6128 mis au point 
avec une DPM2000. Il peut facilement être 
adapté à d'autres imprimantes. Réf: S 221 
Prix : 128 F 

D PROGRAMMES EN LANGAGE MACHINE 

S. WEBB 
La façon de programmer l'équivalent des instruc- 
tions BASIC : PRINT, GOTO, GOSUB, FOR/NEXT 
etc, est tout d'abord étudiée, puis ces notions 
sont appliquées à la réalisation d'un jeu d'action. 
De nombreux sous-programmes pourront être réu- 
tilisés par le lecteur dans ses propres program- 
mes. Réf: S. 195 - Prix : 82 F' 



D LOCOSCRIPT 

B. LE DU 
Ce livre est une introduction et par sa démarche 
pédagogique, il vous permettra une découverte 
aisée et rapide de ce traitement de textes. C'est 
aussi un ouvrage de référence auquel vous pour- 
rez vous reporter et un guide pratique. 
Réf: S.195 - Prix : 82 F 



D ASTROCALC 

G. BLANC, P. DESTREBECQ 
Si vous souhaitez disposer d'un outil de calculs 
permettant l'élaboration d'un thème natal ou 
d'une révolution solaire, la comparaison de thè- 
mes, la recherche automatique des transits et 
progressions tout en comprenant les mécanismes 
mis en œuvre. Alors cet ouvrage vous comblera. 
Réf: S.162 - Prix : 148 F 



D PREMIERS PROGRAMMES AMSTRAD 

R. ZAKS 
Quels que soient votre âge et votre formation, 
écrivez votre premier programme BASIC en moins 
d'une heure. Présentation claire, comportant de 
nombreux diagrammes et illustrations en couleur. 
Réf: S.105 - Prix : 118 F 

D UNIVERS DU PCW 

P. LEON 
Environnement matériel, commande de CP/M 3.0 
le BIDOS, le BIOS, fichiers binaires, éditeur de 
disquettes, désassembleur Z80, graphismes, 
caractère à la loupe. Prix :119F 



DIVERS INFORMATIQUE 



D JOUEZ AVEC M05 
Eddy DUTERTRE 40 F 

D MIEUX PROGRAMMER SUR ORIC 
Michel ARCHAMBAULT. 110 F 

D COMMUNIQUEZ AVEC ORIC 
Denis BONOMO 
et Eddy DUTERTRE 145 F 

D INTERFACE POUR ORIC 1 ET ATMOS 
M. LEUREL 59 F 

O v 0RIC A NU 

Fabrice BROCHE 151 F 

D PLUS LOIN AVEC LE CANON X07 

Michel GANTIER 85 F 



EMISSION f RECEPTION 



D SYNTHETISEUR DE FREQUENCE 

M. LEVREL F6 DTA 
Réalisé par un radioamateur, cet exposé n'a d'au- 
tres buts que de donner au plus grand nombre 
le désir et les moyens de réaliser sa propre sta- 
tion, tous modes BLU, FM ou tout autre récep- 
teur de grande qualité. 
Prix : 125 F 



D CONCEVOIR UN EMETTEUR 
EXPERIMENTAL 

Pierre LOGUSCI 
Entièrement consacré à des montages à tran- 
sistors, le livre est la synthèse d'innombrables 
recherches et le fruit d'une grande passion que 
l'auteur, enseignant enthousiaste et enchanté, 
communique à chaque page et invite à partager. 
Prix : 69 F 



D LA PROPAGATION DES ONDES 

Serge CANNIVENC 
Seuls ouvrages de référence de langue française 
sur la propagation des ondes. Ils constituent un 
support de cours idéal pour l'enseignement 
supérieur. 

DTome 1 - Prix : 165 F 

D Tome 2 - Prix : 253 F 



D LA RECEPTION DE SATELLITES METEO 

Loïc KUHLMANN 
Ce livre est destiné à un lecteur non spécialiste 
et n'a d'autre ambition que de l'intéresser aux 
techniques de réception des satellites météoro- 
logiques transmettant des photographies de la 
Terre. 
Prix : 145 F 



D TECHNIQUE DE LA BLU 
G. RIGAUD F6CER 
La bande latérale unique est le mode de trans- 
mission le plus utilisé actuellement pour le tra- 
fic sur les bandes décamétriques et pour les liai- 
sons à grande distance en VHF, UHF et SHF. 
Prix : 95 F 

D LES ANTENNES 

R. BRAULT et R. PI AT 
Cet ouvrage met à la portée de tous, les grands 
principes qui régissent le fonctionnement des 
antennes. Mais aussi permet aux lecteurs de réa- 
liser et de mettre au point les nombreux dispo- 
sitifs décrits. Réf : R 439 
Prix : 185 F 



DIVERS 



LA BAULE DAKAR 54 F 

D EXPEDITION PÔLE NORD 95 F 

D EXPEDITION CARTIER LABRADOR 

EN CANOË KAYAK 80 F 



MARINE 



D MANOEUVRE 

CATAMARAN CROISIERE 49 F 

D TRAITE RADIO MARITIME 162 F 
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Housses de protection - Simili cuir - (le lot clavier + moniteur) 
Fabriquées et garanties par nos soins. 



D 


CPC 464 et 664 


Moniteur monochrome 


D 


184 F (port compris) 






Moniteur couleur 


n 


184 F 


D 


CPC 6128 


Moniteur monochrome 


n 


184 F 






Moniteur couleur 


n 


184 F 


D 


PC 1512 


Moniteur monochrome 


n 


190 F 






Moniteur couleur 


n 


190 F 


D 


MACINTOSH 


Clavier simple 


□ 


184 F 






Clavier pavé numérique 


n 


184 F 



DES DISQUETTES 

(doubles faces, doubles densités) 



(port compris) 

- Disquettes 5" 1 /4 avec la pochette 50 F 
lot de 10 

- Disquettes 3" 1 /2 avec la pochette 190 F 
lot de 10 

- Disquettes 3" avec la pochette cartonnée 270 F 
lot de 10 












I JtÀÏUL. 



VIDEO 




^et jvwi : 
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Collection Aventure 




ELEPHANT KILLER EXTERIEUR NUIT 



wxni 







< *b 




L'OR DES INCAS NOCES DE SANG DOUX MOMENTS 

DU PASSÉ 



Collection Films Japonais 




TIGRESSES MOTO MASSACRE 

m 



Comédie Spectacle 



/ 




LE COQ 

DU VILLAGE 



PATRICK 

SEBASTIEN 

(Olympia! 




EN CAS 

DE GUERRE 

MONDIALE JE FILE 

A L'ÉTRANGER 



SCOUT 
TOUJOURS 



NUIT D'IVRESSE 







VIOLENCE LA VENGENCE BRUCE 

A MANAOS DE LAMA CONTRE-ATTAQUE 




OÏTSUCI DEFI SANGLANT IMPACT 5 



RAGE DE TUER 



- KENSAI 

- SAIGNEE 
-FURY 



Films de Guerre 




CHARLIE BRAVO ZERO 




MIDNIGHT 




PAS DE PITIE 
POUR LES HÉROS 



Collection Horreur 




L'HORRIBLE PSYCHOSE BEN 

SEXY VAMPIRE phase 3 



POLICIERS 




CENT JOURS A PALERME 




/ 



TEMOIN A ABATTRE 



LES SPÉCIALISTES 



POLICIER 



MUSICAL 



AGATHA CHRISTIE - Le dossier d'une 

femme d'un certain âge 

Regain 

Porte des Lilas 

Les diaboliques 

L'héritage de la violence 

Les aventures d'Arsène Lupin ..:... 

La femme flic 

Le mors aux dents 

L'homme aux nerfs d'acier 

Le choc 

Une robe noire pour un tueur 

Le bar du téléphone 



AVENTURE - ACTION 



Le salaire de la peur 

Si Versailles m'était conté 

Le troisième homme 

Caroline chérie 

Fanfan la Tulipe 

Les mongols 

Les titans 



COMEDIE DRAMATIQUE 



L'homme que je suis 

Cela s'appelle l'aurore 

Poil de carotte 

Passion d'amour 

Allons z'enfants 

Sauve qui peut 

Parfum de femme 

Les frères 

Retour à Marseille 

Les grandes manœuvres .... 
Les bijoutiers du clair de lune 
La curée 



COMEDIE 

Tout l'or du monde 

Est-ce bien raisonnable ? 

Archimède le clochard 

Et Dieu créa la femme 

Un drôle de caïd 

Affreux, sales et méchants 

Cocktail Molotov 

Robinson et le triporteur 

Cigalon 

Prends ta Rolls 

On n'y joue qu'à deux 



DOCUMENT 



Chaplin inconnu 



KIDVISION 



Les maîtres de l'univers 1 

Fat Albert 1 

Mush 1 

Les Bisounours 1 

La vie des Botes 1 

Les entrechats 1 

Le vent dans les saules 

Arok le barbare 

M.T 

Pataclopp Pénélope 

Scoubidou va à Hollywood 

Dorothée... on va faire du cinéma 



EROTIQUE 



La femme tatouée 
Madame Bovary . 



120,00 
120.00 
120.00 
120.00 
135.00 
120.00 
135,00 
120.00 
120.00 
135.00 
120.00 
120.00 



120.00 
135.00 
120.00 
120,00 
120,00 
120,00 
120,00 



120,00 
120,00 
120,00 
120,00 
120,00 
120,00 
135,00 
120,00 
120,00 
120,00 
120,00 
120,00 



120,00 
135.00 
120.00 
120.00 
120,00 
120,00 
120,00 
120,00 
120.00 
120,00 
120,00 



120.00 



120,00 
120,00 
120.00 
120.00 
120.00 
120.00 
120.00 
120.00 
120,00 
120.00 
120,00 
165,00 



120,00 
120.00 



Tina Turner ■ Nice N'Rough 1 20,00 

Phil Collins • Uve 120,00 

Peter Tosh Live 1 20,00 

Whitesnake • Live 120,00 

Duran Duran - Dacing on the Valentine 120,00 

Stamping Ground 120,00 

Bongo Man 120,00 

Sheila E 120,00 



VIDEO MUSIQUE NOUVEAUTE 

Kate Bush ■ The whole story 1 65,00 

Tina Turner ■ Break every rule 165,00 

Queen - Live in Budapest 1 65,00 

Arcadia • Arcadia 1 65,00 

Talking heads - Stop making sensé 165,00 

John Lennon - Imagine 1 65,00 

Iron Maiden - Live after death 165,00 



COLLECTION "GRANDS CLASSIQUES" 

La conquête de l'Ouest 225,00 

Les douze salopards 225,00 

Les prédateurs 225,00 

Peter et Elliott le dragon 225,00 

Tron 225.00 

Horowitz à Moscou (stéréo/HiFi) 225,00 

The compleat Beatles (stéréo/HiFi) 225,00 

Autant en emporte le vent 270,00 

Soleil vert 270,00 



WALT DISNEY ET DESSINS ANIMES 

Dumbo 270.00 

Robin des Bois 270,00 

Le nouvel amour de Coccinelle 270,00 

Peter et Elliott le dragon 270,00 

Tron 270,00 

La bande à Donald 225,00 

Le Noël de Mickey 225,00 

Winnie l'ourson et l'arbre miel 225,00 

Droopy ■ vol. 1 225,00 

Festival de dessins animés (Tex Avery...) 225,00 

' La panthère rose • vol. 1 225,00 

Tom et Jerry "La souris valseuse" 225,00 

Tom et Jerry • vol. 1 225,00 

Tom et Jerry • vol. 2 225,00 

Tom et Jerry "Souris Follies" 225,00 

Tintin "Le crabe aux pinces d'or" 225,00 

Tintin "L'étoile mystérieuse" 225,00 

Tintin "L'île noire" 225,00 

Tintin "Objectif lune" 225,00 

Tintin "Le secret de la Licorne" 225,00 

Tintin "Le trésor de Rackham le Rouge" 225,00 






COLLECTION GRANDS FILMS 

Un Américain à Paris 225,00 

Famé 225,00 

Il était une fois à Hollywood 225,00 

Le magicien d'Oz 225,00 

Le champion 270,00 

2001 l'odyssée de l'espace (stéréo/Hi-Fi) 270,00 

Poltergeist 270,00 

Ouo Vadis 270,00 

Victor/Victoria 270,00 

Eddy Paris Mitchell (stéréo/Hi-Fi) 225,00 

Sardou concert 87 (stéréo(Hi-Fi) 270,00 
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PROFITEZ DES PRIX BRETAGNE EDIT'PRESSE 



BOITES DE 
RANGEMENT 
MEDIA BOX 
POSSO 




Pour 40 

à 150 disquettes 

3", 3" 1/4, 3" 1/2 

125 F 



DISQUETTES p "«sf 

Recommandé facultatif 
3" P»' Boîte 7 F en plus 




90 F 



COMPACT 
DISC 

Pour 13 compact 

dises 

Port 25 F 

Recommandé facultatif 
par Boîte 7 F en plus 



Pour 
16 minicassettes 

75 F 



CASSETTES Po « 25 F 

_ Recommandé facultatif 

AUDIO p ar BoI,e 7 f en p |us 





122 F 



VIDEO 

Pour 9 cassettes 

vidéo VHS, V2000 

Beta 



Port 25 F 

Recommandé facultatif 
par Boîte 7 F en plus 




Pour 50 
70 disquettes 

175 F 



DISQUETTES Port 25 F 

_ ff . . _ Recommandé facultatif 

5 1/4 P ar Boi,e 7 F en plus 







Les 

de 



79 



Un mémento personnel 

Un planning 

Un tableau des ascendants 

, prévisions globales 
chaque signe en 88 

^ conseils pratiques 

Les prévisions 

semaine par semaine 

Des petits encadrés 
L'agenda 
Le répertoire 



BON DE COMMANDE 



a adresser à 



BRETAGNE EDITTRESSE 

La Haie de Pan - 35170 BRUZ - 

Tél. 99.57.90.37 



FRANCO 



Textes : Laure-Marie LAPOUGE 
Illustrations : Nicole PIBEAUT 



CDIVONS DU QUETZAl 



Je joins mon règlement 

chèque bancaire □ chèque postal □ mandat □ 



NOM 
nî 



Prénom. 



Rue_ 



Ville 



Xode postal 



-Signature 



"Ecrire en majuscules" 







Eo\JC^ fS : 



V)t\u^w rES 







CHAQUE LOGICIEL COMPREND 



Un rappel des cours 



Des exemples ou démonstrations 



MATHS -6 

Algèbre pour classe de 6ème 
(également intéressant pour 
CM1-CM2) 
M.etM.-T.COQUIO 



MATHS- 54 

Algèbre pour classes de 5ème 

e{4ème 

M. etM.-T. COQUIO 



MATHS -3 

Algèbre pour classe de 3ème 
M.etM.-T.COQUIO 

EQUATIONS 

Algèbre pour classes de 3ème 

et2nde 

M. COQUIO 



• Des exercices programmés ou libres 

Prix TTC 



• Opérations +;-;x;/ 

• Fractions 

• Calculs sur les relatits 

• Pourcentages avec graphisme 

• Suites proportionnelles avec graphisme 

• Calculs d'aires 

• Symétries orthogonales 


• PC 220 F 

•AMSTRAD 

2 K7 170 F 


1 disk 200 F 


• ATARI ST 

1 disk 220 F 




• Multiples et diviseurs d'un entier 

• Nombres premiers 

• Puissances d'un entier naturel 

• Décomposition d'un entier naturel 
•P.G.C.D.etPP.C.M. 

• Calcul algébrique 

• Rationnels (simplifications et opérations de fractions) 

• Equations et inéquations dans R 


• PC 220 F 

(octobre) 

• AMSTRAD 

2K7 170 F 


1 disk 200 F 


• ATARI ST 

1 disk 220 F 




• Constructions de vecteurs 

• Calculs sur les droites 

• Systèmes linéaires 2,2 
•Régionnementduplan 

• Calculs sur les racines carrées 

• Notions de trigonométrie 


•AMSTRAD 

2K7 170 F 


1 disk 200 F 


• PC 220 F 

• ATARI ST 

1 disk 220 F 




• Equations du second degré avec interprétation graphique 

• Systèmes linéaires 2,2 

• Systèmes linéaires à n équations 

• p inconnues (n, p < 8) (sur disquette seulement) 


•AMSTRAD 

1 K7 150 F 


1 disk 200 F 





Un rappel des cours 



• Des exemples ou démonstrations 



Des exercices programmés ou libres 

Prix TTC 



MATHS -Second cycle 1 

Niveau 2nde à terminales 
M. COQUIO 


• Equations du second degré avec interprétation graphique 

• Courbes Y = F(x) avec choix du repère et des unités 

• Intégrales par la méthode des rectangles avec interprétation 
graphique et exercices 

• Suites récurrentes avec graphisme 

• Fonctions réciproques 


MATHS-Second cycle 2 

Algèbre 2ème à terminales 
M. COQUIO 


• Image par application affine 

• Courbes avec options (dont hardcopy) 

• Courbes superposées 

• Courbes définies par morceaux (disquette) 

• Famille de courbes 

• Courbes planes (cinématique) 

• Courbes définies par une intégrale 


GEOMETRIE plane 

Niveau 4ème à terminales 
M. HIRTZLER 


Utilitaire de dessin pour tracer points, droites, segments et cercles 
avec résultat de géométrie analytique. 

Utilitaire de TRANSFORMATIONS (translation, homothétie, simili- 
tude...) sur des figures simples (carré, triangle, cercle...). 


ESPACES et SOLIDES 

Niveau 1ère et terminales 
M. HIRTZLER 


Utilitaire de dessin dans l'espace avec la perspective "fil de fer". 
Représentation de solides dans l'espace avec choix des angles de 
perspective. 



• AMSTRAD 

2K7 

1 disk 



• AMSTRAD 

2K7 

1 disk 



• AMSTRAD 
1 disk 



200 F 
250 F 



170 F 

200 F 



200 F 



• ATARI ST 

(géométrie plane et dans respace) 

1 disk 220 F 



• AMSTRAD 
1 disk 



200 F 



NOUVEAUTES 



FONCTIONS et 
COMPLEXES 

Niveau Terminale et Sup. 
M. HIRTZLER 



FRANÇAIS 

Niveau CM1.CM2, 6e 
A. MALASSIS 



-Tracé de y = f(x), polaires, droites, enveloppes avec choix du 
repère et des unités. 

- Calculs, calculs d'aires 

- Exemples (conchoides, dssoides, coniques) 

- Complexes (calculs, équations, transformations et exemples). 



■ Dictée réussie 
Exemples et exercices 

■ Conjugaison 

Participes passés avec ETRE et AVOIR. 



• ATARI ST 
1 disk 



• AMSTRAD CPC 

2K7 

1 disk 



220 F 



170 F 

200 F 



701 61 33 


Equation, inéquation 4ème et seconde 
T07, T08, M05, M06 - cassette seulement 


175 F 


7100154 


Balade Outre-Rhin 4ème et 3ème. 
IBM - Disquette 


280 F 


7100153 


Balade au Pays de Big-Ben 6ème et 5èmùe 
IBM - Disquette 


280 F 


7100147 


Enigme a Munich 4ème et 3ème 
IBM - Disquette 


280F 


66042 72 


Je révise sciences 6ème et 5ème 
IBM 


235 F 






Les utilitaires 



PRODUITS CP.C 



La" trilogie" du 6128 (disponibles sur disquette seulement). 



1201 D 
1202D 


Tasword 61 28 "Mailmerge". Le traitement de texte du 61 28 
Masterfile 6128 Base de données relationnelle 


360 F 
360 F 


1203 D 


Mastercalc 61 28 Tableur simple, rapide et puissant. 


300 F 


Masterfile et Mastercalc peuvent envoyer leurs données vers Tasword. Tous trois sont utilisables sur 464/664 
Ironies. Tasword 6128 peut s'utiliser avec les extensions VORTEX. Clavier AZERTY accommodé. 


+ extension 64K Dk' 


1200 K 


Tasword 464 


260 F 


1201 D 
1208 D 
1207 K 

1258 D 

1259 D 


Tasword "disquette" pour 464 et 664 (avec Tasword 61 28) 
Tascopy, copies d'écran (8 tons de gris, formats A4 & A3) 
Tascopy CPC version cassette 
Semabank, gestion de comptes bancaires rapide et fiable 
Statistiques multivariées pour CPC 464 et 6128 


360 F 
230 F 
190F 
330 F 
395 F 


1205 K 
1212 


Tasprint CPC sur cassette 

Conversion BUS 61 28 nouveau cour Dérichériaues standard (extensions, svnthés. 

digitaliseurs...). 


190F 
175 F 



PRODUITS CP.C ET P.CW. (2 versions sur la même disquette) 



1206 D 
1262D 


Tasprint, le typographe. 5 écritures sur CPC, 8 sur PCW. 

(compatible Tasword CPC & PCW, Locosript, Wordstar...) 

Tas-Sign, l'artiste en lettres, enseignes, réclames créez-les vous même... 


230 F 

300 F 



PRODUITS P.CW. 8256 ET 8512 



1217D 
1221 D 


Tasword 8000, le traitement de texte rapide avec "mailmerge" pour les utilisations 

professionnelles. 

Masterfile 8000, la base de données relationnelle travaillant entièrement en RAM, rapide, 

flexible, simple et puissante. 


450 F 
550 F 



PRODUITS "PC" IBM ET COMPATIBLES 



1226 D 
1251 D 
1263 D 


Tasword PC, le traitement de texte des PC, simple, puissant et avec "mailmerge". 
Tasprint PC, le typographe, 20 écritures, créateur de caractères, mode "machine à écrire". 
Tas-Sign PC, l'artiste en lettres, enseignes, réclames créez-les vous-même... 


490 F 
390 F 
390 F 
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SUPERBE CASQUETTE FM 


200 F Port compris 




Noir 


Blmc 


Bleu 


Rouf» 






VikinK 






X 


X 


Pxul Ricard 






X 






- 


IhiiWÉw 






X 


X 


\ 


\ 


Udi 






X 


X 


A 


1 — id 


ftrrxri 






X 
X 


X 


• PI, 


Exilei 






X 






ftncbe 






X 


X 







LU 



AUTO RADIO 



Réf. : CR 150 FL 

GO FM stéréo 

Affichage digital 

Avance rapide 

Horloge incorporée 

2x5W 

Livré avec notice de montage très 

explicative. 

599 F (port compris) 



RADIO CASSETTE 



Double K7 

Réf. : CR 150 FL 

Radio 3 gammes : PO GO FM stéréo 

Enregristrement automatique 

Alimentation pile-secteur 

Micro incorporé : copie automatique 

720 F (port compris) 



RADIO REVEIL 
TELEVISION 



Marque : AUDIOLOGIC 

Réf. : 3705 

Téléviseur noir et blanc 

Normes CCIR : EUROPE 

Haute performance 

Radio PO-GO-FM 

Réveil à affichage digital 

Réveil matin par la TV ou la radio 

Alimeniaùon 220 V ou 12 V 

1 415 F (port compris) 




RADIO-REVEIL 



Affichage électronique permanent 

24h / 24 

Radio GO-FM 

Réveil automatique radio ou sonnerie 

Garde la mémoire si coupure de courant 

155 F (port compris) 



BALADEUR 



Marque : KASUGA 

Réf. : KC8 

4 couleurs : rouge, bleu, moutarde, 

blanc. 

1 mini lecteur de K7 stéréo 

Pince au dos : livré avec casque 

Alimentation 2 piles R6 (non fournies) 

Un prix très léger : 

124 F (port compris) 



BALADEUR 



Marque : KLERVOX Réf. : VT28 

Enfin 1 mini enregistreur 
Caractéristiques : 

- lecteur-enregistreur de poche 

- microphone incorporé 
Avance rapide 

Haut-parleur de contrôle incorporé : 

deux vitesses 

Parole : musique égaliseur 3 bandes 

300 Hz - 2 kHz - 8 kHz 

livré avec casque 

615 F (port compris) 



BALADEUR 



Marque : KLERVOX Réf. : VT-84 

1 lecteur de K7 stéréo 

Avance et retour rapides. 

Combiné avec récepteur radio 

FM stéréo et égaliseur à 3 curseurs 

100 Hz - 1 kHz - 10 kHz 

Livré avec casque 

Alimentation 2 piles R6 (non fournies) 

415 F (port compris) 






8 TELEVISEUR TUBE 



Marque : VIDEOLOGIE Type : 3703 
Téléviseur noir et blanc 1 1 cm 
Sélecteur VL/VH/VHF 
Alimentation 220 V ou 12 V 
Plaque de fixation voiture 
Boîtier pile 

1 015 F (port compris) 



TELEVISEUR 
CRISTAUX LIQUIDES 

Marque : CITIZEN Réf. : 18 TA 

Dans votre poche, au bureau, dans la 
voiture, il pèse 290 grammes. 
Réception UHF/VHF 
Reçoit toutes les chaînes françaises. 
Livré avec casque et notice. 

POCHE PORTABLE 

1 515 F (port compris) 
BUREAU PORTABLE 

1 315 F (port compris) 



BON DE COMMANDE 



a adresser à 



BRETAGNE ED1TPRESSE - La Haie de Pan 
35170 BRUZ-Tél. 99.57.90.37 



ATTENTION 

Bien inscrire les ARTICLES dans 
la bonne rubrique ; le port étant cal- 
culé en fonction de l'objet a 
expédier. 



CALCULEZ LE COUT : Montant de l'article + Port = VERITE DES PRIX 




DESIGNATION 


Réf. 
au n° 


Qté 


Prix 
unitaire 


+ Port 


Montant 


o 

■o 
> 






























































Envoi UNIQUEMENT en recommandé (20 F par cassette) 


TOTAL 




JE 

o 

Z 
i 






























































Envol Poste : 10 % 


TOTAL 




N £ 

<■>■= 

o-tr 
c £= 

25 
m ■ 

N S 

^H 

3 ° 

ai» 






























































Envoi UNIQUEMENT en recommandé (25 F par logiciel) 


TOTAL 




■ 

m 

S 

3 O) 

s - ! 
S ° 

Sot 

3 
O 




Réf. 
au n° 


Qté 


Prix 
unitaire 


Montant 






























































Envoi FRANCO "Sur toute la France" (Etranger nous consulter) 


TOTAL 




TOTAL 




MONTANT GLOBAL 







Je joins mon règlement chèque bancaire n chèque postal 


□ 


mandat 




NOM Prénom 
N° Rne 






t 


Ville Code Dostal 






"Ecrire en majuscules" 



D carte bleue n 

IMPERATIF 

Si vous choisissez le paiement 

par Carte Bleue, n'oubliez pas 

d'indiquer le n° de la carte et 

la date de validité ainsi que 

votre signature 



N° CARTE BLEUE 



DATE Limite de validité 







lité Signature 



- -■-'■ ■ 






CHAMPIONNAT 



André BARKAT 




Pour les deux menus, seules les touches 
"I" et "t" et "COPY" sont effectives. 



MENU PRINCIPAL 

Le curseur doit être positionné sur l'option choisie. 
Appuyez une fois sur "COPY", l'option clignote. 
Appuyez une seconde fois, le menu secondaire s'affiche. 
Si vous n'appuyez pas une seconde fois, le curseur peut à nou- 
veau être bougé. 

MENU SECONDAIRE 

Il permet de la même façon, soit de revenir au menu principal, 
soit de confirmer l'option. 



MENU PRINCIPAL 

NOUVELLE JOURNEE 

Choisir la journée (avec "I" et "t" et "COPY"). 
Sélectionner l'équipe qui recevait. 
Inscrire le nombre de buts marqués par cette équipe. 
Inscrire le nombre de buts marqués par l'autre équipe. 
Sélectionner l'équipe qui a été reçue. 



pour annuler ou "C" pour confirmer. 

pour le retour au menu ou "U" pour un autre 



Tapez sur "A 

Tapez sur "M 

match. 

La journée peut être entrée complète ou incomplète 

CLASSEMENT 



Sélectionner la journée. 
Patientez 

= points 
= buts pour 
= buts contre 
= matches gagnés 
= matches nuls 
= matches perdus 
= journées déjà jouées 



GRAPHIQUE 

• Sélectionner l'équipe 

Les journées déjà jouées apparaissent en foncé. 

SAUVEGARDE 

Sauve les données créées par Nouvelle journée sur le disque 
face B en effaçant l'ancien fichier. 

CHARGEMENT 

Charge les résultats déjà enregistrés pour la saison 
IMPORTANT : c'est l'opération qui doit être effectuée en pre- 
mier après la mise en marche de "CHAMPION". 

RESULTATS 

Sélectionner la journée : les résultats entrés s'affichent. 

FORME ACTUELLE 

Sélectionner la dernière journée. Une note est attribuée à cha- 
que équipe. Elle va de a 40 selon les résultats des 5 dernières 
journées. Elles représentent la forme actuelle de chaque équipe. 
Cette option aide à pronostiquer les résultats. 
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EXEMPLE : 

— Si [note de l'équipe qui reçoit + 5] > [note de l'équipe reçue] 
alors cocher 1 sur le bulletin du loto sportif. 

— Si [note de l'équipe qui reçoit + 51 = [note de l'équipe reçue) 
alors cocher N sur le bulletin du loto sportif. 

— Si [note de l'équipe qui reçoit + 5] < [note de l'équipe reçue) 
alors cocher 2 sur le bulletin du loto sportif. 

QUITTER 

Pour quitter le programme. 

NB : le listing 1 doit être actualisé : il suffit de remplacer 1986 
par 1987 en ligne 30, puis de modifier la série de DA TAS ligne 
250. 



Z LES PROGRAMMES 



— Chargement : tapez RUN "C— -" (donnée en 4 chiffres : ici 
"C1987". Le programme principal "CHAMPION" se charge 
seul. 

— "C1 987" : ce programme en BASIC charge en mémoire (par 
pokes), l'année et le nom des équipes, puis lance le programme 
principal. Pour chaque saison, il faut créer un nouveau "C— - " 
en chargeant seulement l'année et le nom des équipes. 

Modifications : pour Amstrad 464 à cassettes : enlever IERA 
et ajouter "!" à toutes les fonctions qui utilisent le magnéto- 
phone (LOAD.SAVE) dans le chargeur "C1987" et le pro- 
gramme principal "CHAMPION". 

Pour CPC 664 et 6128, remplacer tous les DEC$((— ) par 
DEC$(-~). 



gtfïSïfi 






«S»» 



Jeu* 
Ges***** 



%%£**** 



VSMtOfî 



EXPLOITEZ 

VOTRE 
AMSTRAD 

le livre + la cassette 

AU«J X FRANCO 

Jeux - Gestion 

Education - Domestique 

Impression de documents 

Un best-seller 

Bon de Commande 

à renvoyer à STAMP DIFFUSION, 17, rue Russeil - 44000 NANTES 

Exploitez votre Amstrad. 103 F - Port gratuit. 

Nom Prénom 

Adresse 

Ci-joint chèque de 103 F. 




10 DM equi$(20) 


>EE 


2« REM ##!*###» 1986 #### 


>NU 


30 E=i986 


■CH 


40 Pl=e MOD 256 


;0H 


50 p2=(E-pl)/256 


>DD 


60 P0KE 37300, p2 


>DH 


70 P0KE 37301.pl 


>DJ 


80 REM ######## 1986 ##t# 


,>NA 


90 FOR N=l TO 20 


>K6 


100 READ EÛUI$!.ru:IF LEN(eOUItin) ), \\ THEN eQUI$ln)=LEF 


>U6 


T*(EQUI$(n>,ll) 




110 NEXT 


>DH 


120 FOR p=l T0 20 


>CD 


130 FOR b=l TO LEN(EQUI$(P)) 


;VC 


140 POKE 37000+(p-l)*ll+(b-l),A5C(MID*(equi*(p),b,l.ij 


>«C 


150 NEXT b:F0R B=LENŒQUI*(F)i+l T0 1 i : POKE 37000+lP-l! 


;>EU 


*ll+(b-l),0:NEXT B:NEXT P 




160 If* 0,9: INK 1.0: INK 2,26: M 3.1: BORDER 9: MODE 1 


>UX 


170 TAGîPLQT 146,384.2: PRINT ! 'C H A M P I N N A T";:T 


>8C 


A60FF 




160 TAG:PL0T 146, 288, 2: PRINT " ";e;" "::TA8 


>AG 


0FF 




190 TAG:PL0T 146. 192, 2: PRINT " L A D I N G"::TA60F 

F 

200 TAG:PL0T 14fc,96,2:PRINT " " ; CHR* < 164) : " A N D R 


/AP 


;LK 


E"::TAG0FF 




210 TAG:PL0T 146,64,2:PRINT " BAR K A T";:TAG0FF 


/XL 
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220 PRINT CHR$(22)+CHR*(i): LOCATE 10. 2: PEN lîPRINT "C H ;MH 
A H P I N N fi T":LOCATE 10. S: PRINT " ":e:" 

":LÛCATE 10.14::PRINT " L A D I N G" 

221 LOCATE lô,2«:PEN 3:PRINT : ' ";CHR$il64):" A N D R M 
E":LOCATE 10.22:PRINT " B A R K A T":PRÏNT CHR$(22) 

+CHR$iÔ; 

23» RUN "champion >Q1 

240 REM ######## 1966 *•### >PQ 

250 DATA BREST, PSG, NANTES, MARSEILLE, BORDEAUX, RENNES. SOC >MY 
HAUX , ST-ETIENNE, NICE, LENS. TOULOUSE, NANCY . AUXERRE, TOULON 
,LILLE.LE HAVRE. MONACO, RC PARIS,LAVAL.METZ# 




10 CLEAR: MEMORY 29870 

20 

30 #*#####*###*### 

40 

50 SYMBOL 240,0,0,0,0,0,0,36,0 crampons 

60 SYMBOL 241,0,0,0.0,0,0,40,0 crampons 

70 SYMBOL 242,0,0,0.4.2.2.0,0 banaes 

80 SYMBOL 243.0.0. 128,o4. 64. 64. 0.0 bandes 

90 SYMBOL 244.48.72,48,0.0,0,0.0 

100 SYMBOL 249.0.56.84.124,84.56,0 ballon 

110 SYMBOL 250,56.66.170.130.170.68.56 ballon 

120 SYMBOL 251,0,0.1.11.125,125.0,0 chaussures 

130 SYMBOL 252,124,124.124,188.188.188.0.0 chaussures 



140 SYMBOL 254.63.15.7.7,7.7.15.63 demi cercle 

150 SYMBOL 255.252,240,224,224,224.224.240.252 demi 

cercle 

160 BORDER 9:INK 0.9: PAPER 

170 PEN lîiNk 1,0: INK 2.26: INK 3.18:MQDE 1 

180 

190 !*#######*#*### 

200 

210 DIM tpt(20),tpr(20.t,tPCi.20).qo!.20) 

220 DIM pl(21).nl(21) 

230 DIM *us(23),flag<21) 

240 DIM jo(20),g*(20!,pei20),nu(20) 

250 DIM ciassU'O) 

260 DIM equi*(20î 

270 FOR n=l TO 20 

280 'FOR b=l TO li:equi*(n)=equi$in!+CHR$(PEEK (37000+in 

-l)*ll+(b-lii):NEXT b 

290 NEXT 

300 annee=PEEK (37300) «256+PEEK (37301 ) 

310 

320 ################ MENU PRINCIPAL 

330 ' 

340 FOR n=l TO 8 

350 RE AD phr$(n) 



m 

>LB 

/LL 
>LD 

m 

;WU 
>VZ 
,>AD 
>YH 
/AT 
>DV 
/Al 

>HX 

>AU 

>MJ 

m 

>HC 
>RK 

;TA 
>RC 
/FU 
>ND 
>RW 
>BN 
;LU 

/Lfl 

>CH 
>ZN 

>Eb 
>EU 
>RE 
>RF 
>R6 
>WG 
/6J 



360 NEXT >EE 

370 DATA NOUVELLE JOURNEE VZ 

380 DATA CLASSEMENT >PM 

390 DAlH GRAPHIQUE ,>NF 

400 DATA SAUVEGARDE >PE 

410. DATA CHARGEMENT >PM 

420 DATA FORME ACTUELLE >TL 

430 DA1A RESULTATS ,'PC 

440 DATA QUITTER /MR 

450 FOR n=l 10 2 >HC 

460 READ phrl$(n) >LL 

470 NEXT >EG 

480 DATA CONFIRMATION >RR 

490 DATA MENU >PG 

500 >RF 

510 *#####*#*#####*# CADRE DE PRESENTATION >RG 
520 ' >RH 

530 TAGîPLOT 146. 384, 2: PRINT "C H A M P I N N A 1"::T >BC 
AGOFF 

540 PRINT CHR*(22)+CHR$U)i LOCATE 10,2: PEN 1: PRINT " >Dfi 
CHAMP 1ÙNNA T": PRINT CHR*(22)+CHR*(0): ÛRIGIN 
0,0: PLOT 10,10.1: DRAW 630,10: DRAW 630.350:DRAW 10,35 
0:DRAW 10,10 

550 PLÛT 8,8:DRAW 632,8: DRAW 632, 352: DRAW 8,352: DRAW 8. G',- 
8:PLUl 20,20:DRAW 620.20:DRAW 620,340:DRAW 2m.34h:DKhw 
20,20:PLOT 30.30:DRAW 610.30:DRAW 610,300:DRAW 30,300:D 
RAW 30, 30: PLOT 10, 10: DRAW 20, 20: PLÛT 630.10: DRAW 620,20 
:PLOT 10,350 

560 DRAW 20, 340: PLOT 630, 350: DRAW 620,340 >GH 

570 >TC 

580 ' ################ >TD 

590 /TE 

600 LOCATE 3,5:PRINT SPACE* (30): LOCATE 18,5:PEN 3:PRINT /XU 
CHR$(24) : : PRINT CHR»(255)+"MENU"+CHR$(254):PRINT CHf»( 
24): PEN 1 
610 

620 ######«###»##### 
630 

640 WINDÛW #3,6,22.8,22:0.8 #3 
650 FOR n=l TO 8 

660 PEN 1 : LOCATE 6, 8+2* (n-1): PRINT PHR$(n) 
670 IF nOfl THEN SOUND 1.250,6, 5, 0,0, 3: SOUND 1,50,2.0 



680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780' 
790 
800 
810 
820 



NEXT 

#t#tt##*«l*«###«* 

PRINT CHR*t22)+CHR*U; 

FOR n=l TO 8 

PEN 1: LOCATE 25,8+2*(N-l):PRINT CHR*(250) 

PEN 2: LOCATE 25,8+2*(N-l):PRINT CHR*t249) 

IF n<>8 THEN SOUND 1,250, 6, 5. 0,0. 3: SOUND 1,50,2,0 

NEXT 

PRINT CHR$(22)+CHR*(0) 

po=8 



>RH 

:>rj 

>RK 

;>WY 

m 

>JD 

>VB 

>EK 
>TF 
>RH 

/RJ 
>UK 
>WK 

m 

>MY 

;VB 
>EK 
>UQ 
>TG 
;RJ 
>RK 
>AC 
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830 PRINT CHR$(22)+CHR*(1) 



84» LOCATE 27,po:PEN 1 
85» LQCATE 27,po:PEN 3 
86» LOCATE 27,pq:PEN 2 



PRINT CHR$«251)+CHR$(252> 
PRINT CHR$i24ti)+CHR$i24i> 
PRINT CHR$(242>+CHR*<243) 



: lHU: 



199,' 




87» PRINT CHR$(22)+CHR$(0); 

88» 

890 *#######tt########## 

90» ' 

91» FOR te=l TO 15»: NEXT te 

92» a=INKEY(»):b=INKEY(2;:c=INKEY(9) 

93» IF ia-ÛK>0 OR c=» ThEN LÛCATE 27,po:PftINT ' 

(po)=» 

94» IF NOT a THEN pcfpo-2: IF po=6 THEN po=8 

950 IF NOT b THEN po=po+2: IF po=24 THEN po=22 

96» IF NOT c THEN GOTO 102» 

97» IF mus(po.)=» THEN SOUND i,l»»»,9,7:SÛUND 3,1 

:inusipo)=l 

98» GOTO 83» 

99» 

1»»» ######*############# 

1Ô1» 

1020 IF po=8 THEN 1=1 

1030 IF po=1» THEN 1=2 

1»40 IF po=12 THEN 1=3 

1050 IF po=14 THEN 1=4 

l»60 IF po=16 THEN 1=5 

1070 IF po=18 THEN 1=6 

108» IF po=2» THEN 1=7 

1090 IF po=22 THEN 1=8 

11»» c=-i 

111» LOCATE t-,po:PEN 2: SOUND 1,50».è.9,»,»,1:PRINT Phr$ 

(1)+" ":FOR te=l TO 60:NEXT te 

112» LOCATE 6,po:PEN 1:PRINT Phr$U) + " " 

113» IF tois=15 THEN toi5=»:GOTO 84» 

il 4» c=INKEY(9) 

115» FOR te=l TO 2»»:NEXT te:tois=fois+l 

116» IF cO-1 THEN 118» 

117» GOTO 11»» 

1180 SOUND 1,7», 10, 9: SOUND 3.8». 1», 7: SOUND 4,5»,1»,û:FÛ 

fi te=l TO 200:NEXT te 

119» LOCATE 6,po:PEN 2: PRINT phr$il)+" " 

120» 

121» #################### MENU SECONDAIRE 

122» ' 

1230 WINDOW *3,6,22,8,22:CLS #3 

124» FOR n=l TO 2 

1250 PEN 1 : LOCATE 6,8+2*in-l):PRINT PHRl*(n) 

1260 IF n<>2 THEN SOUND 1. 250,6, 5,»,0,3:SQUND 1.50,2,0 

127» NEXT 

128» b=LENiphr$Ci!> 

1290 LOCATE (40-b)\2,5:PEN 3:PRINT CHR$t24)+CHR$(0î;:PR 

INT CHR$ (255) +phr*(l!+CHR$ (254): PRINT CHR$(24)+CHR$(0): 

PEN 1 

1300 FOR n=l TO 8 

1310 LOCATE 25, 8+2* (N-l): PRINT " " 

132» NEXT 



>UM 
>RF 
/RE 
>RJ 

/VA 
/T6 
,>TH 
M. 
>VD 
>Fv 
»ttf 

,KF 
/MH 
/UA 
>HH 

,>AE 
/TJ 
/XD 
>XE 
;NY 
>PH 
>PM 
/PR 
>PW 
,-PA 
>PV 
;PZ 
>ZG 

m 

/HF 
>DN 
/ED 
>JC 
>Pfi 
>lJ 
>ïQ 

>HP 
>XF 

>XG 
>XH 

>XT 
>CB 
>LC 

;>wl 

/LB 
>NA 
>PK 



T 



>CE 
>AH 

>KH 



133» PRINT CHR$'22/+CHR*U) >VD 

134» FOR n=l TO 2 >CC 

1350 PEN 1: LOCATE 25, 8+2» (N-l): PRINT CHfitt25»; >NZ 

1360 PEN 2:L0CATE 25.8+2XN-1) :PRINT CHR$(249) >NK 
137» IF n</2 THEN SOUND 1,25», 6, 5,»,», 3: SOUND 1,5», 2,» ,>WN 

136» NE Aï /LD 

139» PRINT CHR$(22)+CHRïi») ;VJ 

14»» >XH 

141» ######################* >XJ 

1420 >XK 

143» po=8 >FG 

1440'f'RINT CHR$(22)+CHR$(1> >VF 

145» LOCATE 27, P o:PEN 1: PRINT CHR*(251)+CHR$(252i ;>TW 

146» LOCATE 27.po:PEN 3:PRINT CHR$';24»)+CHR$(241) >TV 

147» LOCATE 27,po:PEN 2: PRINT CHR*(242)+CHR$(243) >T2 

148» PRINT CHR$(22j+CHR$(0): >WJ 

149» /YG 

15»» ######*################ xj 

151» ;XK 

152» FOR te=l TO 15»: NEXT te vD 

153» a=ÏNKEY(»;:b=INKEY(2>:c=INKEY(9) >6A 
154» IF ia-bK,>» OR c=» THEN LOCATE 27.po:PRINT " ":mu >FW 
s(pq)=» 

155» IF NOT a THEN po=po-2: IF po=6 THEN po=8 >LL 

156» IF NOT b THEN pd=po+2: IF po=12 THEN po=1» >MT 

157» IF NOT c THEN GOTO 163» >UG 
158» IF mus(poi=0 THEN SOUND 1.1»»», 9. 7: SOUND 3,1199.9. >NU 
6:musipo)=l 

1590 GOTO 144» >NB 

160» >XK 

1610 ######################## >YA 

162» ' >YB 

163» c=-l ,AE 

1640 IF po=8 THEN k=l >NF 

1650 IF po=1» THEN k=2 ;PQ 
166» LOCATE 6,po:PEN 2:SOUND 1,500,6.9,0,0, 1: PRINT phrl >NC 
$(k)+" ":FOR te=l TO 6»:NEXT te 

167» LOCATE 6,po:PEN i:PRINT phrl*(k)+" " >JE 

168» IF tois=15 THEN +"oi5=»:GOTO 144» >EE 

1690 c=lNKEY(9) >FD 

170*j FOR te=l TO 200:NEXT te:tois=-fois+l >JD 

171» IF cO-1 THEN 173» >PU 

172» GÛTO 163» >MH 
173» SOUND 1,7». 1», 9: SOUND 3,8», 1».7: SOUND 4,50,l»,o:FÛ >YR 
R te=l TO 2»»: NEXT te 

174» LOCATE 6,po:PEN 2:PRINT phrl$<k)+" " >JD 

1750 ' ;YF 

176» ############### DIRECTION >Y6 

177» ' >YH 

1780 IF k=2 THEN GÛTO 6»» >RV 

179» IF 1=1 THEN 3640 >NN 

18W0 IF 1=2 THEN 463» >NF 

181» IF 1=3 THEN 308» >NF 

182» IF 1=4 THEN 241» >ND 

183» IF 1=5 THEN 259» >NQ 

184» IF 1=6 THEN 2770 >NT 

185» IF 1=7. THEN 1970 >NW 
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1866 IF 1=8 THEN 1880 >N¥ 

1870 ' >YJ 

1886 ############### QUITTER >YK 

18% ' >Zfl 

1900 LOCATE 3,5:PRINT SPACE*<30): >B6 

1910 LOCATE 18,5:PEN 3:PRINT CHR$ ( 24 )+CHR$U.';: PRINT CH >HV 
R$(255)+"ADIEU"+CHR*(254) 

192» PRINT CHR$(24)+CHR*U); ?WX 

1930 a*=INKEY$:IF a*<>"" THEN 1930 >AE 

1940 a*=INKEY$:IF a$="" THEN 1940 >ZP 

1950 CALL >PA 

i960 ' >YJ 

1970 ############### RESULTATS >YK 

1980 ' >ZA 

1990 LOCATE 6, 8: PRINT SPACE*U5) >AK 

2000 LOCATE 6,1Ô:PRINT SPACE$(15) >AW 

2010 J=l M 

2Ô20 LOCATE 6.8:PEN 1:PRINT "JOURNEE " >HK 

2030 LOCATE 6,10:PEN 1: PRINT " " >BC 

2040 LOCATE 6, 10: PAPER 3:PEN 1: PRINT DEC$uj,"##"S >RB 

2050 a=INK£Y(0)sb=INKEY(2)!C=lNKEY(9):FOR te=l TO 50: NE ;GX 
XT te 

2060 IF NOT a THEN j=j-i:IF j=0 THEN .j=l:GOTÛ 2040 ELSE >BN 
2040 

2070 IF NOT b THEN j=j+lîIF o=3-9 THEN 1=38: GOTO 2040 E >DR 
LSE 2040 

2080 IF NOT c THEN PAPER 0:LOCATE 6,B:PRINT SPACEK30): >BB 
LOCATE 6, 10: PRINT 3PACE$i30):GÛT0 2100 

2090 GOTO 2050 -MF 

2100 LOCATE 15,8:PRINT J:CHR$(244) " JOURNEE" /NU 

21 10 WINDOW #3. 4, 16, 1 1, 20: PAPER #3.3: CLS #3 >JZ 

2120 WINDOS #3, 25.37. 11. 20: PAPER #3. 3: CLS #3 >KW 

2130 WINDOW #3, 18. 19. 11. 20: PAPER #3, 2: CLS #3 >KY 

2140 WINDOW #3,22.23. 11.20: PAPER #3.2:CLS #3 ;KN 

215Ô ORIGIN Ô.O:PLOT 47.7B,3:DRAWR 0,1 62: DRAWR 209.0:DR >DC 
AWR 0,-162: DRAWR -209,0 

2160 ORIGIN 0,Ô: PLOT 383. 78. 3: DR AWR O, 162: DRAWR 209.0:D >ES 
RAWR 0,-162: DRAWR -209,0 

2170 ORIGIN O.OîPLOT 45,76, 1 : DRAWR 0,166:DRAWR 213.0:DR >CE 
AWR 0.-166: DRAWR -213,0 

2180 ORIGIN O.0:PLOT 381,76.1: DRAWR 0,l6t>: DRAWR 213,Ô:D >EA 
RAWR 0,-166: DRAWR -213, O 

2190 ORIGIN O,0:PLOT 271, 78, 2: DRAWR 0.162:DRAWR 33,Ô:DR >DB 
AWR 0,-162:: DRAWR -33,0 

2200 ORIGIN Ô.0:PLOT 335, 78, 2: DRAWR 0,162:DRAWR 33.0:DR >CC 
AWR 0.-162: .-DRAWR -33, 

2210 ORIGIN 0,0: PLOT 333, 76,1: DRAWR 0.166: DRAWR 37,0: DR >D6 
AWR 0,-166:: DRAWR -37,0 

2220 ORIGIN O.O: PLÛT 269. 76,1: DRAWR 0, 166: DRAWR 37.0: DR >DR 
AWR 0.-166:: DRAWR -37,0 

223Ô FOR n=l TO 10 >LG 

2240 eb=eb+i:adv=PEEK(35320+(j-l)*20+(eb-D) >LN 

2250 IF +laq(eb)O0 OR adv=0 OR adv>20 THEN n=n-l:GOTO >BR 
23O0 

2260 LOCATE 4,N+10:PAPER 3:PRINT equi$ieb) >KR 

2270 LOCATE 18,N+lô:PAPER 2:PRINT DEC$((PEEK (33800+ (j-1 )WG 
)*20+(eb-l )),"##") 

2280 LOCATE 22,N+10:PAPER 2:PRINT DEC» UPEEK (34560+ (j-1 >WG 



! #20+ leb-i >),"##") 

2290 LOCATE 38-LEN(equi*(adv) ! ,N+10: PAPER 3:PRINT equiî >ZQ 

(adv):+'lag(adv)=l 

2300 IF eb<20 THEN NEXT ,>QT 

2310 IF (Kl THEN LOCATE 4,11:PAPER 3: PRINT "PAS DE " >VP 

2320 IF n<l THEN LOCATE 25,13:PAPER 3:PRINT "RESULTATS" >AK 



2330 
2340 
2350 
2360 
2370 
2380 
2390 
2400 
2410 
2420 
2430 
2440 



IF n<l THEN LOCATE 4.15:PAPER 3:PRINT "INSCRITS" 

eb=0:FOR n=l TO 20:tlaq(ni=0:NEXT 

a*=INKEY$:IF a*<>"" THEN 2350 

a»=INKEY»:IF a$="" THEN 2360 

PAPER #3.0: WINDOW #3. 3, 38, 8. 23: CLS #3 

PAPER 0:PEN 1 

GOTO 600 



############### SAUVEGARDE 

LOCATE 6.8:PEN 1: PRINT "APPUYER SUR 
LOCATE b.iO:PEN 2: PRINT "UNE TOUCHE 



:PEN 1 

i! :PEN 1 



2450 a$=INKEY$:IF a*<>"" THEN 2450 

2460 a$=INKEY$:IF a»="" THEN 2460 

2470 kl=INTiannee/lOOO) 

2480 k2=INT l (annee-t: 1*1000,' / 100) 

2490 k3=INT(fannee-kl#10OO-k2*lO0)/10) 

2500 k4=INTi iannee-kl*lOOO-k2*100-k3#10) ) 

2510 t;t=CHR* i k 1 +48 ) +CHR$ ( k2+46 ) +CHR* ( k3+48 ; +CHR$ ( k4+48 ! 

2511 IERMW 

2520 SAVE k$,b. 30000,6144 

2530 LOCATE 6,8:PEN 1: PRINT "SAUVEGARDE " 

2540 LOCATE 6.10:PEN 2:PRINT "TERMINEE ":PEN 1 



2550 a*=INKEY»:IF a*<>"" THEN 2550 

2560 a»=INKEY*:IF a*= ii! ' THEN 2560 

2570 GOTO 6Ô0 

2580 

2590 ######### CHARGER 

2600 

2610 LOCATE 6.8:PEN 1: PRINT "APPUYER 



SUR 
2620 LOCATE 6,10:PEN 2: PRINT "UNE TOUCHE 



:PEN 



2630 a»=INKEY*:IF a$0"" THEN 2630 

2640 at=INKEYt:IF a*="" THEN 2640 

2650 kl=INT(annee/100Ô) 

266Ô k2=INT ( (annee-kl*lo00) /100) 

2670 k3=INT( (annee-kl*100O-k2*100)/10) 

268Ô k4=INT( (annee-kl»10O0-k2»100-k3*10) ) 

2690 k»=CHR* (ki+48) +CHR* tk2+48) +CHR* (k3+48> +CHR$ (k4+48) >ZD 



,>XX 
>FF 
>Z6 
>ZH 

/HP 
/MB 
/FF 
/XJ 
/Xk 
>YA 
>TC 
,-VA 

>AA 
>ZK 
>RH 
>ZY 

>EZ 
>HB 

>YC 

>R6 

/RE 
/LE 
/VR 

/AL 
>ZM 
/FF 
>YH 
>YJ 
>YA 
>PQ 
>UE 

>AA 
>ZK 
>RH 
>ZY 
>EZ 
>HL 



2700 LOAD K$ 

2701 LOCATE 10,10: 

2710 LOCATE 6,8:PEN 1: PRINT "CHARGEMENT 
2720 LOCATE 6,10:PEN 2:PRINT "TERMINE 



":PEN 1 



273Ô a*=INKEY*:IF at<> 
274Ô a*=INKEY*:IF a$=" 
2750 GOTO 600 



THEN 2740 



>XD 
>LA 
>NU 

M 

>AC 
>ZM 

>FF 
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2760 

2770 ######### FORME ACTUELLE 

2780 

279« J=i:li=4:co=i0 

2800 LOCATE 6,S:PEN hPRINT 'JOURNEE 

2810 LOCATE 6,10:PEN hPRINT " 

2820 LOCATE 6,10:PAPER 3:PEN hPRINT DEC$Uj,"##") 



.m H 
>YJ 
>Yk 
,»NR 

>m 

6J 
>RH 



2830 a=INKEY(0):b=INKEY(2):c=INKEY(9):FQR te=l TO 50:NE >6D 

XT te 

2840 IF NOT â THEN j=j-i:IF j=0 THEN .1=1: GOTO 2820 ELSE ,bH 

2820 

2850 IF NOT b THEN j=j+l:ÏF j=39 THEN j=3B: 60TO 2820 E >DL 
LSE 2820 

2860 IF NOT c THEN PAPER 0:LDCATE 6,8:FRINT SPACE$(30-: >BZ 
LOCATE 6,10:PRINT SPACE$(30):SGTO 2880 

2870 GOTO 2830 >NH 

2880 r=j:rl=r-4sIF rl<l THEN rl=l >AC 

2890 LOCATE 13, 8: PEN hPRINT ri"— "r" JOURNEE" >NQ 

2900 FOR n=l TO 20 >LM 

2910 FOR .io=l TO 5 Lu 

2920 a=PEEK(30000+Uj-iJ*20;-!\jo-l;*20-tn-l;); >MH 

2930 al=PEEKi33800+u.]-l)*20;-U.io-l;*2»-m-l;n /NT 

2940 tot=tot+*a*2) : NK 

2950 totl=totl+al:IF al>20 THEN al=20 ,Dv 

2960 NEX7 jo >FE 

2970 PAPER ô: LOCATE li,co:PEN hPRINT equiifnii" " >HQ 
2980 LOCATE Ii+l 1 . co: F'EN 2:PRINT DEC» <( tot+tot 1 ,"##"); : ;WW 
PEN 3:PRINT "MO" 

2990 co=co+l:IF co=20 THEN ïi=ii+18:co=i0 >JD 

3000 tot=0:totl=0:NExT n >UV 

3010 a$=INKEY$:IF a$\/ :,,i THEN 3010 >IU 

3020 a$=INKEY$:lF a$="" THEN 3020 >YD 

3030 LOCATE 10,8:PRINT SPACE*(25) /AD 

3040 WINDOW #3,4,38,10,20 >RD 

3050 CLS #3 >L£ 

3060 GOTO ûOO >FA 

3070 ' >YC 

3080 #*############ GRAPHIQUE i ïD 

3090 >YE 

3100 p=l >VH 

3110 LOCATE 6,8:PRINT SPACE$(15) >AV 

3120 LOCATE 6.10:FRINT SPACE*(15i >AA 

3i30 PAPER 3:PEN 1 >LG 

3140 LOCATE 6.8:PRINT " " >AF 

3150 LOCATE 6,8:PRINT SPACE$(LEN(equi$(pd))) NF 

3160 LOCATE 6,8:PRINT equi*ip,' >YP 
3170 a=INKEVi0):b=INKEY(2):c=INKEYi9):F0R te=l TO 50: NE >D6 
KT' 
3180 IF NOT a THEN pd=p:p=p-l:IF p=0 THEN p=1:G0T0 3140 >HN 

ELSE 3150 

3190 IF NOT b THEN pd=p:p=p+l:IF P=21 THEN p=20:60T0 31 >LG 
40 ELSE 3i50 

3200 IF NOT c THEN GOTO 3220 >UV 

3210 GOTO 3170 /ME 

3220 LOCATE 6, 8: PAPER 0:PRINT SPACE*u'0) >HÛ 

3230 LOCATE 6.10:PRINT SPACE$(20ï >AY 
3240 LOCATE (40-|_EN(equi*(p)l )\2.8:PAPER 3:PEN hPRINT >KH 



equi$(P.) 

3250 PAPER 0:PEN 1 
3260 PLOT 48,48,1: DRAW 580,48 
3270 PLOT 48, 48: DRAW 48,268 
3280 FOR n=48 TO 580 STEP 14 
3290 IF m/48 THEN PLÛT n,46 
3300 IF nx/48 THEN PLÛT n,44 
33ly NEXT 

:3320 FOR n=48 TQ 268 STEP 10 
3330 IF n04B THEN PLÛT 46. n 
3340 IF n<>48 THEN PLÛT 44, n 
3350 NEXT 

'3360 PLÛT 40. 58: DRAW 36, 58: DRAW 36,62:PLQT 40. 58: DRAW 4 
•0,54 

3370 PLÛT 62, 40: DRAW 62, 32: PLOT ûO.38 
3380 PLOT 1OO.220:DRAWR 40,0:PLÛT 100,220: DR AWR 0,40 
33^0 PLÛT 138,222:PL0T t38, 218: F'LOT 13ù.224:PlûT 136,21 
6 

3400 PLÛT 98,256:PLÛT 96,256:F1ûT 104,256:PLÛT 102,25b 
3410 PLOT 8O,260:DRAWR 0,-10:DRAWR 0. iO:DRAWR 5.0:DRAWF 

0.-5:DRAWR -5,0 
3420 PLÛT 80,245:DRAWR 5.0:DRAWR -2.0:DRAWR 0,-10 
3430 PLOT 80. 230: DR AWR 5,0:DRAWR -5.0:DRAWR 0.-3:DRAWR. 
5,0:DRAWR 0.-7:DRAWR -5.0 

3440 PLÛT 105,210:DRAWR 0,-8:DRAWR -2,-4:DRAWR -3,0:ÛRA 
WR -1,2 
3450 PLOT 112,210:ÛRAWR 3.0:DRAWR l.-2:DRAWR 0.-8.-DRAWR 

-l.-2:DRAWR -3,0:DRAWR -1,2:DRAWR 0,8:DRAWR 1,2 
3460 PLOT i22.210:DRAWR 0.-8:DRAWR 2,-4:DRAWH 3.0:DRAWR 

2,4:DRAWR 0,8: 
3470 PLOT 134.210:DRAWR 0,-12:DRAWR 0,6:DRAWR 3.0:DRAWR 

1.2:DRAWR 0,2:DRAWR -1,2:DRAWR -3,0 
3480 DRAWR 0,-4:DRAWR 5,-8 
3490 TÛL=0 
3500 FOR n=l TÛ 38 
35 1 a=PEEK ! 30000+ ( N- 1 ) *20+ ( P- 1 )i 
3520 toL=toL+a 

3530 PLÛT 50+(n-l)*14,5O+TOL*2,2:DRAWR 13. O 
3540 FOR CE=50+T0L*2 TO 50 STEP -2 
3550 PLÛT 50+(n-l)*14,CE,2+PEEKi(n-h*20+P-h3O76O>:DRA 
WR 13,0 
3560 NEXT 
3570 NEXT 

3580 A$=INKEY$:IF A$O u " THEN 3580 
3590 A$=INKEY$:IF A$="" THEN 3590 
3600 WINDOW #3.3.38,8.23 
3610 CLS #3 
3620 GOTO 600 
3630 ' 

3640 ############### NOUVELLE JOURNEE 
3650 

3û60 LÙCATE 6.8:PR1NT 3FACE*i15j 
3670 LOCATE 6,10:PRINT SPACE$(15> 
3680 J=l 

3690 LOCATE 6,8:PEN hPRINT "JOURNEE 
37Ô0 LOCATE 6,10:PEN hPRINT " 
3710 LOCATE 6, 10: PAPER 3: PEN hPRINT DEC*<(j,"tt") 
3720 a=INKEY(0):b=INKEY(2):c=INKEï(9):F0R te=l TO 50:NE 
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XT te 

3730 IF NÛT a THEN j=j-i:IF .j=0 THEN j=l:60TQ 3710 ELSE >BE 

3710 

3740 IF NOT b THEN j=j+l:IF j=3? THEN i=38: 60TQ 371* E >DH 
LSE 3710 

3750 IF NOT c THEN PAPER 0: LOCATE 6,8:PRINT 3PAŒ*i3ô): >BX 
LOCATE 6.l0:PRINT SPACE$(30):GÛTÛ 3770 
3760 GOTO 3720 >NF 

3770 LOCATE 15,8:PRINT J;CHR$l244;" JOURNEE" >NU 
3780 WINDOW #3,4, 16, 11, 20: PAPER #3,3:CL5 13 >JP 

3790 WINDOW #3,25,37, 11, 20: PAPER #3,3:CLS #3 ;KL 
3800 WINDOW #3, 18,19,11, 20: PAPER #3, 2: CLS #3 >KD 
3810 WINDOW #3.22,23, 11, 20: PAPER #3,2:CLS #3 >KU 
3820 ORIGIN 0,0: PLÛT 47,7B,3:DRAWR Ô,162:DRAWR 2o9,0:DR >DH 
AWR 0,-162: DRAWR -209,0 

3830 ORIGIN 0,0: PLOT 383.78,3:DRAWR Ô,162:DRAWR 209,0: D >EM 
RAWR 0,-162: DRAWR -209,0 

3840 ORIGIN 0.0: PLOT 45.76, 1:DRAWR 0.1d6: DRAWR 213.0: DR >DB 
AWR Ô,-166:DRAWR -213,0 

3856 ORIGIN 0.0: PLOT 381,76, 1:DRAWR 0, i66:DRAWR 213. ô:D >EF 
RAWR 0.-166: DRAWR -213,0 

3860 ORIGIN 0,0: PLÛT 271.78.2:DRAWR 0.162:DRAWR 33.0: DR >D6 
AWR 0,-162:: DRAWR -33,0 

387Ô ORIGIN 0,0: PLOT 335, 78, 2: DR AWR 0.162: DRAWR 33,ô:DR >BJ 
AWR Ô.-162::DRAWR -33. Ô 

3880 ORIGIN 0,0: PLOT 333,76, 1:DRAWR 0.166: DRAWR 37.0: DR >DX 
AWR 0.-166:: DRAWR -37,0 

3890 ORIGIN 0.0: PLOT 269,76, 1: DRAWR 0.166: DRAWR 37.0: DR >D6 
AWR 0.-166:: DRAWR -37,0 

3900 y 1 = 1 1 >KB 

3910 p=1:x1=4:k2=25 >NC 

3920 c=MEY(9):IF NOT c THEN 3920 >Al 

3930 PAPER 3:PEN 1 : LOCATE xl,yl:PRINT SPACE$<LEN<equi$i >HJ 
pd) ) J 

3940 LOCATE :<l,yl:PRINT equi$(pj >BQ 

3950 a=INKEY(0):b=INKEY(2/:c=INKEY(9>:FOR te=l TÛ 50: NE >GH 
XT te 

3960 IF NOT a THEN pd=p:p=P-l:IF p=ô THEN p=1:G0T0 3930 >HE 
ELSE 3930 

3970 IF NOT b THEN Pd=P:p=p+l: IF p=21 THEN p=2o:SÛT0 39 >LY 
30 ELSE 3930 

3980 IF NOT c THEN eql=P:P=0:GOTO 4ÔÔÔ >EA 

3990 GOTO 3950 >PF 

4000 x3=18:x4=22 . ! HB 

4010 but=ô >PB 

4020 c=INKEY(9):IF NOT c THEN 4020 >AF 

4030 PAPER 2:PEN 1: LOCATE x3,yl:PRINT SPACE$(2) >0D 
4040 PAPER 2:PEN 1: LOCATE x3,yl:FRINT DEC*(lbut,"##"! >XA 
4050 a=INI(EY(0):b=INKEY(2):c=INKEY(9):FOR te=l TO 150:N >HJ 
EXT te 

4O60 IF NOT a THEN but=but-l:IF but=-l THEN but=ô:GOTO >PZ 
4O30 ELSE 4Ô30 

4070 IF NOT b THEN but=but+l:IF but=100 THEN but=99:S0T >RD 
4030 ELSE 4030 

4080 IF NOT c THEN bul=but:'but=0:6OTO 4100 >KJ 

4090 GOTO 4040 >MJ 

4100 c=INKEY(9):IF NOT c THEN 4100 >AD 

4110 PAPER 2:PEN 1: LOCATE x4,yl:PRINT SPACE$(2) >QD 



Y 4120 PAPER 2:PEN 1: LOCATE x4,yl:PRINT DEC$((but,"##") mA 

4130 a=INK£ïi0/:b=INKEY(2):c=INKEïi9>:FOR te=i Tû i50:N /HH 
EXT te 

4140 IF NOT a THEN but=but-lsIF but=-l THEN dut=0:6ÛT0 ;PW 
4110 ELSE 4110 

415Ô IF NOT D THEN but=but+l:IF out=lÔO THEN but=99:G0T ,F;A 
Û 4110 ELSE 4110 

4160 IF NOT c THEN bu2=ûut:but=O:GûT0 4180 il 

417Ô GOTO 4120 >rtb 

4180 p=l:c=INKEY(9)sIF NOT c THEN 4180 ,>EX 

4190 PAPER 3:PEN 1:L0CATE (38-LEN(equi*(pdm,yi:PRINT /FP 
SPACE$(lBI(equi$(pd))) 

4200 PAPER 3:PEN 1: LOCATE (38-LEN(equi$(p))),yl:PRINT e >JN 
qui$ip.» 

4210 a=INKEY(0):b=INKEY(2i:c=INKEY(9):FOR te=l TO ioo:N >HB 
EXT te 

4220 IF NOT a THEN Pd=p:p=p-i: IF p=0 THEN p=l:BOTO 4190 >HF 
ELSE 4190 

4230 IF NOT b THEN pd=p:p=p+i:IF p=21 THEN p=2ô:G0T0 41 ,>Lk 
90 ELSE 4190 

4240 IF NOT c THEN eq2=p:P=0:GûTÛ 4270 /Eh 

4250 GOTO 4200 /ME 

426Ô ,£ 

4270 con=con+i ;ïG 

428Ô LOCATE 6,22:PAPER 3:PEN lsPRINT [Clontirmer ou >BF 

[AInnuier" 
4290 d=INKEï i62) :e=INKE*«69; \b 

4300 IF NOT E THEN con=con-l:eqi=ô:equ2=0:dul=ô:bu2=O:L >ER 
OCATE Xl.ïhPRINT SPACE*( 13): LOCATE x2.ïl:PRINT 5FACE*. 
t3):PAPER 2:LÛCATE X3.Y1:PRINT SPACEK 2): LOCATE »4.Y1:P 
RINT SPACE$(2):PAFER OîlûCATE 6.22:PRINT SPAŒ*(30):PAF 
ER 3: GOTO 3910 
4310 IF NOT d THEN GOTO 4330 
4320 GOTO 429Ô 

4330 ad r 1 =30000+ (eql-i ) ♦ ( j-1 ) «20 
4340 adr2=3ô000+ (eq2- 1) + ( j - 1 ) *2Ô 
435Ô adr3=30760+(eql-l) + u-D*20 
4360 adr4=30760+(eq2-l) + (.i-l/*2ô 
4370 adr5=31520+(eql-l» + i.j-l)*20 
4380 adr6=31520+ ieq2-l ) + ( j-1 ) *2o 
4390 adr7=32280+teql-l) + (.j-l)*20 ' 
440Ô adr8=32280+ (eq2-l) + < j-1 ) *2Ô ' 
4410 adr9=33040+leql-l)+(j-l)*20 ' 
4420 adr 10=33040+ (eq2-l ! + ( j-1 ) #20 
4430 adrll=33800+(eql-li+(j-l)*20 
4440 ad r 1 2=33800+ (eq2-l ) + i j-1 ) *26 
4450 ad r 1 3=34560+ l eq 1 - 1 i + ( j - 1 i *2Ô 
4460 adrl4=34560+(eq2-l)+(j-l)*20 
4470 adrl5=35320+(eql-l) + (j-D*20 
4480 adrl6=35320+ (eq2-l ) + i j-1 ) *2Ô 
4490 POKE adrl5,eq2:P0KE adrl6,eql+2ô 
4500 POKE adr3,l:P0KE adr4,l 
4510 IF bul>bu2 THEN POKE adrl,3 
1:P0KE adr6,0:POKE adr7,0::POKE adrB.l 
4520 IF bul<bu2 THEN POKE adrl,0:POKE adr2,2:P0KE adr5, >CA 
0:POKE adr6,I:P0KE adr7,l::P0KE adrB,0 
4530 IF bul=bu2 THEN POKE adr 1,1: POKE adr2,l:P0KE adr5, >VK 
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0:POKE adr6,0:PÛKE adr7.0::POKE adr8.0:POKE adr9.i:P0KE 
adrl0,l 

4540 POKE adrll,bul:PQKE adrl2,bu2 >CU 

455« POKE adrl3,bu2:POKE adrl4,bul >CZ 

4560 LOCATE 6, 22: PAPER 3:PRINT "[U]n autre ou [« >PK 
Jenu " 

4570 y=IN«:EY (38) : z=INKEY (42) >YH 

4580 IF NOT y THEN WINDOW #3, 3, 38, 8, 23: PAPER #3.0:llS # >Yfi 

4593 IF Nul" y THEN y=-l:can=ê: PAPER 0:F'En i:SOTÛ ôW /VF 

4600 IF NOT : THEN z=-l: IF con=10 THEN can=0:WINDOW #3, >NJ 

3, 38, 8, 23: PAPER #3,0:CLS #3:F'EN 1: PAPER &:GQÏQ 600 EL3 

E LOCATE 4, 22: PAPER Ô:PRINT SPACE$(35)::vl=yl+l:6ûTÛ 39 

10 

4610 GOTO 4570 /NE 

4620 ' /ïE 

4630 ######«######## classement >yf 

4640 ' >YG 

4650 FOR n=l Tû 20 >LR 
4660 tpt (n) =0: tpr in) =0: tpc (n) =0: qo (ru =0: jo (ni =0: 9a mi =0 > * T 
ipediJsôtnutn) 5 ^ 

4670 NEXT >LJ 

4680 c=INkEY(9):IF NOT c THEN 4680 Ab 

4690 LOCATE 6,8:PRINT SPACE$(15) >AK 

4700 LOCATE 6,10:PRINT SPACE$(15) >AF 

4710 J=i >VK 

4720 LOCATE 6,8:PEN 1:PRINT "JOURNEE >HV 

4730 LOCATE 6,10:PEN 1:PRINT " " >BM 

4740 LOCATE 6, 10: PAPER 3:PEN 1:PRINT DEC*((.j."##"; >TC 
4750 a=INKEY(0;:b=INKEY(2):c=lNKEY(9):FOR te=l TO 50: NE >BG 
XT te 

4760 IF NOT a THEN j=j-l:IF .1=0 THEN .i=l:GûTÛ 4740 ELS >BB 
E 4740 

4770 IF NOT B THEN j = .j+l:IF .j=39 THEN .1=38: GOTO 4740 E >DH 
L3E 4740 

4780 IF NOT c THEN PAPER 0:LQCATE 6, 8: PRINT SPACE$I38): >BM 
LOCATE 6, 10:PRINT SPACEf (30): GOTO 4800 

4790 GOTO 4750 >PD 

4800 LOCATE l6,13::PEN 2: PRINT "PATIENTEZ" >LJ 

4810 FOR n=l TO 20 >LP 

4820 FOR jo=l TO j >LU 

4830 a 1 =PEEk ( 30000+ ( j 0- 1 ) *20+ ( n- 1 ) i >BJ 

4840 bl=PEEK(33800+(jo-l)*20+(n-li) >BY 

4850 c 1 =PEEK ( 34560+ ( j 0- 1 ) *20+ ( n- 1 ) ) ';■ BE 

4860 d 1=PEEK (30760+ ( jo-1 i #26+ (n-1 ) i /BE 

4870 e 1 =PEEK ( 3 1 520+ ( j 0- i ) *20+ ( n- 1 i ) > BB 

4880 tl=PEEK(32280+Uo-l;*20+(n-l)) ;BH 

4890 gl=PEEK(33040+(.io-l)*20+(n-l).) >BE 

4900 tpt(n)=tpt(n)+al >QU 

4910 tpr(n)=tpr(n)+bi >ÛR 

4920 tpc(n)=tpc(n)+cl >QL 

4930 jo(n)=jo(n)+dl >NR 

4940 qa(n)=ga(nl+el >NG 

4950 pe(n)=pe(n)+fl >NM 

4960 nu(n)=nu(n)+gl >NV 

4970 NEXT >MB 

4980 go(n)=tpr(n)-tpc(n) >UV 

4990 NEXT n >XC 



:FMNT lH /UB 



/NT 
/VF 



5000 FOR n=l TO 20 

5O10 class CN)=tpt (n) *100000+qo (n)*10O»+tpr (n) 

5020 NEXT 

5030 ci=l 

5040 r=MAX(clas5d),cià55(2),ciass(3;,clàss(4;,ciass(5; 

, class (6), class (7), class (8), class (9;. class ( loi. classai 

), class (12), classa3), class ( 14), class (15). class! 16;, cia 

ssa7), class (18), class (19), class (20;) 

5050 FOR n=l TO 20 

5O60 IF r=ciass(n) THEN pl(cl)=n:cl=cl+l:clas5in,'=-10' 6 

:n=l:GOTO 5080 

5070 NEXT 

5O80 IF cl=21 THEN 5100 ELSE 5090 

5090 60T0 5040 

5100 CLS:cl=0 

5110 LOCATE 16,1: PAPER 3:PEN 0:PR1NT CHR$l255;:ûEL*t i.;, 

"##") :CHR*(244) ; "J0URNEE"CHR$(254) :PAPER 

512y LÙCATE 6,1: PAPER 0:PEN 2:FRINT CHR*i249 

R$(22)+CHR$(1); 

5130 LOCATE 6,1: PAPER 0:PEN 1: PRINT ftft$<258); 

5140 LOCATE 35,1:PAPER 0:PEN 2-.PRINT CHRH249) 

5150 LOCATE 35, 1: PAPER 0:PEN hPRlNT CHR$ (250);: PRINT C 

HR$(22;+CHR$(0); 

5160 PRINT:PRINT :PRINT STRINB$(40,CHR*(21&))::PRINT 

5170 BOSUB 5360 

5180 tpt (0) =-9999999: tpc (0; =-9999999: tpr (6) =-9999999: n l 

0;=i:FOR n=l TO 20: ni (n)=n:NEXT n 

5190 FOR n=l Tû 20 

5200 v=pl(n):IF tpt(v)=tpt(pl(n-D) AND tpr(v)=tpr(pl(n 

-1)) AND tpc(v)=tpc(plïn-l)) THEN IF n>l THEN nl(n)=nli 

n-1) :f 1=1 

5210 PEN 2:L0CATE 2,4+n:IF T1=0 THEN PRINT DEC** (ni (n;. 

"##"> ELSE PRINT " ":t"i=0 

5220 PEN WLÛCATE 5,4+n:PRINT equiï(v) 

5230 PEN 3: LOCATE 18,4+n:PRINT BEC$((tpt(v),"##") 

5240 PEN 2:L0CATE 21,4+n:PRINT DEC$i(tpr(v;, "#**"; 

5250 LOCATE 25,4+n:PRINT DEC$(ltpc(v), "*##") 

5260 PEN 1 : LOCATE 29,4+n:PRINT DEC$((ga<v),"##") 

5270 LOCATE 32,4+n:PRINT DEC$((nu(v),"##") 

5280 LOCATE 35,4+n:PRINT DEC$( ipe(v),"##") 

5290 LOCATE 38,4+n:PRINT DECti (, ,10 (v), "##"); 

5300 NEXT 

5310 PEN î : LOCATE 17,4:PRINT "Pts":LOCATE 21,4:PRINT " 

P-" 

5320 LOCATE 25,4:PRINT " c.":LOCATE 29,4:PRINT "G. ":LOC 
ATE 32,4:PRINT "N.":LOCATE 35.4:PRINT "P.":L0CATE 36.4: 
PRINT "J." 

5330 a$=INKEY$:IF a$<>"" THEN 5330 
5340 a*=INKEY*:IF a$= i,u THEN 5340 
5350 CLS:60T0 530 

5360 :PLOT 0,8,1:DRAWR 0,350:DRAWR 638,0:DRAWR 0,-350:D 
RAWR -638, 8 

5370 PLOT 10,8:DRAWR 0,350:PLOT 244,S:DRAWR 0,350:DRAWR 
2,0:DRAWR 0,-350 

5380 PLOT 308,8:DRAWR 0,350: PLOT 372,8:DRAWR 0,350 
5390 PLOT 436,8:DRAWR 0,350: PLOT 484,8:DRAWR 0,350 
5400 PLOT 532,8: DRAWR 0,350: PLOT 580,8:DRAWR 0,350 
5410 RETURN 
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OUVERT du 

mardi au samedi 

de "lOhOOà 13h30 

et de 14h30à 19h. 




Métro : 
VILLIERS 



82-84, Bd des BatignoUes 75017 Paris Tél. 42.93.24.58 



GRATUIT 



1 IMPRIMANTE STAR (valeur 2990 F) 

1 CORDON IMPRIMANTE 
1 LISTING 1000 FEUILLES 

1 INTEGRALE PC, comprenant : 

- Traitement de texte EVOLUTION SUNSET 

- Tableur graphique CALCOMAT 

- Base de données rédactionnelles 
SUPERBASE 

- Pack de 4 jeux 
- 10 disquettes 5"1/4 




POUR L'ACHAT 



D'UN 



AMSTRAD PC 1512 SD MONOCHROME 
ou AMSTRAD PC 1512 SD COULEUR 
ou AMSTRAD PC 1512 DD MONOCHROME 
ou AMSTRAD PC 1512 D0 COULEUR 
ou AMSTRAD PC 1512 HD 

20 MEGA MONOCHROME 
ou AMSTRAD PC 1512 HD 

20 MEGA COULEUR 



5 920,00 F TTC 
8170,00 F TTC 
7 450,00 F TTC 
9 700,00 F TTC 

10662,00 F TTC 

12 915,00 F TTC 



Offre valable du 14/09/87 au 31/12/87 en fonction des stocks disponibles. 



PROMOTION 
SPECIALE 



du 09/09/87 au 31/12/87* 

10 DISQUETTES 5 1/4 
AMDRUM 
MULTIFACE 2 



Prix public TTC 



JOYSTICK 125+ 

JOYSTICK MACH 1+ 

4 STYLOS IMPRIMANTE MCP 40 

' Dans la limite des stocks disponibles. 



JmMT 

MM-r 
xmorr 



49,00 F 
299,00 F 
375,00 F 

69.00 F 
129,00 F 

22,00 F 



IMPRIMANTES 

STAR DELTA 10 
STAR DELTA 15 _ 
STAR RADIX 10 
STAR RADIX 10 I . 
OKI 83 A 
EP80 + . 






LECTEURS DE DISQUETTES 



1290.00 F TTC 
1490,00 F TTC 
1990.00 F TTC 
2290.00 F TTC 
1290.00 F TTC 
1490,00 F TTC 



DDI1 




1990.00 F TTC 


FD1 




1590.00 F TTC 


FD ? (pour PCW 8256) 




1777.00 F TTC 


JASMIN 5"1/4 AM 5d+ 




1699.00 F TTC 


+ 

CORDON DE RACCORDEMENT 




150.00 F TTC 


EXTENSION MEMOIRE DK TRONIC 

fi4K - 464/664 




396.00 F TTC 


256K - 464/664 




891.00 F TTC 


256K - 6128 




891.00 F TTC 


256K - PCW 




235.00 F TTC 


HORLOGE EN TEMPS REEL-PCW 




470.00 F TTC 


INTERFACE PROGRAMMABLE POUR JOYSTICK 
AVEC SYNTHETISEUR DE SON-PCW 


448.00 F TTC 


INTERFACE PROGRAMMABLE POUR JOYSTICK- 
PCW 


235.00 F TTC 


DIVERS 

SCANNER DART 




790,00 F TTC 


CRAYON OPTIQUE DART 




390,00 F TTC 


SYNTHETISEUR VOCAL TECHNIMUSIQUE 
SYNTHETISEUR VOCAL TECHNIMUSQUE - 
DOUBLEUR DE JOYSTICK 


-K7 

DKT 


495,00 F TTC 

530,00 F TTC 

90,00 F TTC 


ADAPTATEUR PERITEL MP 2 




450,00 F TTC 


NTERFACE RS 232 CPC 




590,00 F TTC 


NTERFACE RS 232 PCW 




690,00 F TTC 


LECTEUR ENREGISTREUR DE K7 




295.00 F TTC 


TURBO COPI III 




375,00 F TTC 


COFFRET TELEMATIQUE KENTEL 




380,00 F TTC 


DISCOI OGY V.3 




350.00 F TTC 


ELECTRIC LANTERN SHOW 




195.00 F TTC 


SOURIS AMX 




690,00 F TTC 


TIINFRTV 




1390.00 F TTC 


ANTENNE TV 




390.00 F TTC 




NOUS SERONS AU FESTIVAL DE LA MICRO 

QUAI D AUSTERLITZ du 9 au 11 octobre 1987 de 10 h à 20 h 



et CORDONS. BOITES DE RANGEMENT. LISTING. RUBAN ENCREUR. LIBRAIRIE. ETC.. 



BON DE COMMANDE A RETOURNER A : MICRO PROGRAMMES 5 - 82-84, bd des BatignoUes - 75017 PARIS 



Jk 



NOM 



Prénom 



Adresse 



Ville 



Code Postal : 

Port en sus : accessoires - 40 F. Imprimantes = 120 F 



Tél. 



— crtb 



u 



TCHERNMISLAND 

2 




Plus que quelques (I) lignes de program- 
mes et Tchernmisland vous ouvrira les 
bras. Rappelons que la première partie du 
jeu se trouve dans le numéro précédent de 
CPC, ainsi d'ailleurs que le mode d'emploi. 
Tapez et sauvez le listing "CHARGEUR P 
2". Après un "RUN", faites SAVE "P 
2",b,30000,7068. Il ne reste plus qu'à 
entrer le listing BASIC. Le démarrage s'ef- 
fectue par RUN "TCHERN ". 

Olivier GUTIERREZ 



CHARGEUR DE P 2 
LISTING 4 



16 A=3y0tî0:F=37H68:L=iO0:WHILE A<=F: 
VAL("ît u +C$):S=S+K+65536*(S+K>32767): 
20 NEXT:READ D$:T=VAL!"!t"+D*) :IF TO 
ur 1 igné" ;L: END ELSE L=L+5:WEND 
10(1 DATA 80,FF,80,F7,80,EF,80,E7,80, 
105 DATA 30,FF,30,F7,3é,EF,30,E7,30, 
lie DATA E0,FE,E0,F6,E0,EE,E0,Eo,E0, 
115 DATA 90,FE,90,F6,9y,EE,?y,E6,96, 
12« DATA 40,FE,40,F6,40,EE,40,E6,40, 
125 DATA F0,FD,F0,F5,F0,ED,F0,E5,F0, 
13e DATA A0,FB,A0,F5,A0,ED,A0,E5,A0, 
135 DATA »,FD,59,F5,5e,ED,50,E5,5«, 
1 4« DATA m , FD , 00 , F5 , 00 , ED , 00 , E5 , W , 
145 DATA B0,FC,B0,F4,B0,EC,B0,E4,B0, 
15e DATA 60,FC,6e,F4,60,EC,60,E4,60, 
155 DATA 10,FC,10,F4,10,EC,10,E4,10, 
160 DATA C0,FB,C0,F3,C0,EB,C0,E3,C0, 
165 DATA 70,FB,70,F3,70,EB,70,E3,70, 
17e DATA 28,FB,20,F3,20,EB,20,E3,20, 
175 DATA D0,FA,D0,F2,D0,EA,D0,E2,D0, 
180 DATA 80,FA,80,F2,80,EA,80,E2 ) 80, 



FOR A=A TO ft+15:READ C$:K= 

IF A<=F THEN POKE A,K 

5 THEN F'RINT Offi$<7);°Erre 

DF,80.D7,80,CF,80.C7.0B18 
DF , 30 , D7 , 30 , CF , 30 , C7 , 1 3B0 
DE, E0, D6, Eè.CE, Eè, C6, 21C0 
DE , 90 , Do , 90 , CE , 90 , Ï6 , 2D50 
DE , 40 , D6 , 40 , CE , 40 , Cô , 3660 
DD,F0,D5,F0,CD,F0,C5,44E6 
DD,A0,D5,A0.CD,A0,C5,50F0 
DD,50,D5,50,CD,50,C5,5A78 
DD, 00, D5, 00, CD, 00, C5, 6180 
DC , B0 , D4 , B0 , CC , B0 , C4 , 6E00 
DC, 60, D4, 60, CC, 60, C4, 7800 
DC,10,D4,10,CC,10,C4,7F80 
DB,C0.D3.C0,CB,C0,C3,8C78 
DB,70,D3,70,CB,70,C3,96F0 
DB,20,D3,20,CB,20,C3,9EE8 
D A , D0 , D2 , D0 , CA , D0 , C2 , AC58 
DA, 80, D2, 80, CA, 80, C2, B748 




185 
190 
195 
200 
205 
210 

ilj 

220 

23e 

235 
240 
245 

25e 

255 
266 
265 
276 
275 



DATA 30,FA,30,F2,30,EA,30,E2,30,DA,30.D2,30,CA,30,C2,BFB8 
DATA E0.F9,E0,Fi,E0,E9,E0,El,E0,D9,E0,Dl.E0,C9,E0.Cl,CDM0 
DATA 90,F9,90,Fl,90,E9,90,El,90,D9,90,Dl,90,C9,90,Ci,D908 
DATA 40,F9,40,F1,40,E9,40,E1,40,D9,40,D1.40,C9.40.C1,E1F0 
DATA F0,F8,F0,F0,F0,E8,F0,E0,F0.D8,F0,D0,F0.C8,F0,C0,F050 
DATA A0, F8, A0, F0, A0, E8, A0, E0, A0, D8, Aè, Dé, A0, C8, Au , C0, FC30 
DATA 50,F8,50,F0,50,E8,50,E0,50,D8,50,D0,50.C8,j0.C0,0590 
DATA 00,F8,00,F0,00,E8,00,E0,00,D8,00,D0,00,C8,00.Lé,yL70 
DATA F0,F0,F0,F0,F0,F0,F0,E1,F3,FF,FF,CF,F3,FF,FF,CF.1B61 
DATA F3,FF,FF,CF,F3,FF,FF,CF,87,0F,0F,0F,0F,0F,0F,0F.23D1 
DATA E1,1F,FC,F0,C0,00,00,30,C0,00,00,30,F0,0F,FF,F0,2B8B 
DATA E1,1F,FC,F0,C0,00,00,30,C0,00,00,30,F0,0F,FF,F0.3345 

DATA 00, 70, 00. 00, 00, F0, 80, 00, 00. 90, A0, 00,00, 70. B0, 00, 37" 5 

DATA 00,F7,F8,00,83,0F,FC,00,40,00,7C,00,83,0F,F8,00,3D38 
DATA 00,F7,F0,00,00,F7,E0,00,00,F0,80,00,30,F0,F0,C0,4536 
DATA 71,FF,FF,E8,E2,B0,60,E4,22,40,9e,44,ll,FF,FF,88,4F30 

DATA 00, 00, E0, 00, 00, 10, F0, 00, 00, 50, 10,00,00,D0,E0,00,5320 

DATA 00,F1,FE,00,00,F3,0F,1C,00,E3,00,20,00,F3,0F,1C,584E 
DATA 00,F0,FE,00,00,70,FE,00,00,10,F0,00,30,F0,F0,C0,5F7A 



76 




280 DATA 
285 DATA 
29« DATA 
295 DATA 
300 DATA 
3Ô5 DATA 
3ie DATA 
315 DATA 
32e DATA 
325 DATA 
33e DATA 
335 DATA 
34e DATA 
345 DATA 
35e DATA 
355 DATA 
36« DATA 
365 DATA 
37e DATA 
375 DATA 
38e DATA 
385 DATA 
39e DATA 
395 DATA 
4<&e DATA 
405 DATA 
4ie DATA 
415 DATA 
42e DATA 
425 DATA 
43e DATA 
435 DATA 
446 DATA 
445 DATA 
45e DATA 
455 DATA 
46e DATA 
465 DATA 
47e DATA 
475 DATA 
480 DATA 
485 DATA 
49e DATA 
495 DATA 
500 DATA 
505 DATA 
510 DATA 
515 DATA 
52e DATA 
525 DATA 
53e DATA 
535 DATA 
54e DATA 
545 DATA 
550 DATA 
555 DATA 
56e DATA 
565 DATA 



71,FF,FF,E8,E2,B0,60,E4,22,90,20,44,il,FF,FF,8B,6954 
00,73,EE,00,71,CF,3F,EE,87,7F,EF,3F,F7,EC,73,FF,72AB 
8F,6C,63,3F,FF,AA,55,FF,CF,AA,55,3F,77,BB,DD,EE,7C4F 
47,89, 19,2E, 77, AB,5D,EE,21,33,CC, 84,21, 01, 08, 84,8225 
21,00,00,84,61,08, 10,86,73,08, 10,CE,F7,8C,31,EF,87C5 
00,00,00,00,00,00,00,00,00,73,EE,00,71,CF,3F,EE,8B93 
87,7F,EF,3F,F7,EC,73,FF,BF,6C,63,3F,FF,AA,55,FF,95B6 
CF, AA,55,3F,77,BB,DD,EE, 47,89, 19,2E, 77, AB,5D,EE,9E44 
21, 33,CC,84,21, 01, 08,84,73,08, 10,CE,F7,8C,31,EF,A492 

00,e0,00,00,00,70,00,00,00,F0,80,00,10,30,90,00,A742 

10, 70, Ae, 00, 00, B7, E0, 00, 00, IF, E0, 00, 01 , 3F, FB, 00, AC30 
83,7B,F8,00,43,73,E8,00,80,31,EC,00,30,B1,F0,00,B332 
51,F8,F7,80,B2,74,A8,C8,54,91,50,44,33,FF,FF,88,BCBA 

00,00,00,00,00,10,C0,00,00,30,E0,00,10,30,90,00,BF6A 

00,B0,D0,00,00,F1,AC,00,00,F1,0E,00,10,F3,8F,00,C518 
10,F3,CB,28,00,F3,C9,48,00,F7,80,20,10,F1,B0,8O,CCDA 
31, FC,F3,40,62,B2,D4,A8,54,51, 30,44,33, FF, FF, 88, D59C 
3F, 20, 01, 00, 00, 00, 3F, 20, 01, 00, 00, 00, 3F, 20, 01, 00, D6BC 
00, 00, 3F, 20, 01, 00, 00, 00, 3F, 20, 01, 00, 00, 00, 3F, 20, D7DB 

01, 00, 00, 00, 3F, 20,01, 00, 00, 00, 3F, 20, 01, 00, 00, 00, D89C 

3F, 20, 01 , 00, 00, 00,3F, 20, 01 , 00, 00, 00, 3F, 20, 01 , 00, D9BC 
00,00,3F,20,01, 00,00,00,00,00,33, 33, 22, 11,22, 11, DAE8 
22, 11, 22, 11, 22, 11, 33,33,00,00,00, 11, 00, 11, 00, 11, DC1A 

00, 11, 00, 11, 00, 11, 00, 11, 00,00,33,33,00, 11, 00, 11, DCE6 

33,33,22,00,22,00,33,33,00,00,33,33,00,11,00, 11, DE7E 
00,33,00, 11, 00, 11, 33, 33,00,00,22, 11, 22, 11, 22, 11, DFD2 
33,33,00,11,00, 11,00, 11, 00, 00, 33, 33, 22, 00, 22, 00, El 15 
33, 33, 00, 11, 00, 11, 33, 33, 00, 00, 33, 33, 22, 00, 22, 0(3, E2AD 
33,33, 22, 11, 22, 11, 33,33, 00,00,33, 33,00, 11, 00, 11, E467 
00, 1 1 , 00, 1 1 , 00, 1 1 , 00, 1 1 , 00, 00, 33, 33, 22,11,22,11, E577 
33,33,22, 11, 22, 11, 33, 33, 00,00,33,33,22, 11, 22, 11, E775 
33,33,00, 11,00, 11, 33,33,06,9F, 26,FF, FF, FF,FF,FC,EE26 
F0,F0,F3,F8,F0,F0,F1,E9,1E,87,79,E9,D2,B4,79,E9,FA9A 
D2,B4,79,E9,96,A5,79,E9,96,A5,79,E9,96,A5,79,E9,0559 
1E,87,79,FC,F0,F0,F3,FF,FF,FF,FF,00,97,11,FF,FF,10E8 
FF,FF,FC,F0,F0,F3,F8,F0,F0,F1,E9,1E,E1,79,E9,D2,1E9A 
C3,79,E9,D2,E1,79,E9,96,E1,79,E9,96,E1,79,E9,96,2A1C 
C3,79,E9,1E,C3,79,FC,F0,F0,F3,FF,FF,FF,FF,0A,B7,3627 
10,FF, FF, FF,FF,FC,F0,F0,F3,F8,F0,F0,F1,E9,1E, 87,4359 
79,E9,D2,B4,79,E9,D2,F0,79,E9,96,87,79,E9,96,96,4E72 
Fl,E9,96,96,79,E9,lE,87,79,fC,F0,F0,F3,FF,FF,FF,5AC4 
FF,04,9F,18,FF,FF,FF,FF,FC,F0,F0,F3,F8,F0,F0,F1,6812 
E9,1E,87,F1,E9,D2,A5,F1,E9,D2,E1,F1,E9,96,C3,79,742A 
E9,96,F0,79,E9,96,96,79,E9,1E,87,79,FC,F0,F0,F3,7F76 
FF,FF,FF,FF,06,9F,3C,FF,FF,FF,FF,FC,F0,F0,F3,F8,8D16 
F0,F0,F1,E9,1E,87,79,E9,D2,B4,79,E9,D2,B4,79,E9,98A7 
96,B4,79, E9,96,87,3D,E9, 96,87,79, E9,1E,F0,79,FC,A298 
F0,F0,F3,FF,FF,FF,FF,02,B7,06,FF,FF,FF,FF,FC,FO,B00E 
F0,F3,F8,F0,F0,F1,E9,1E,87,79,E9,D2,B4,F1,E9,D2,BCDC 
87,79,E9,96,E1,79,E9,96,E1,79,E9,96,A5,79,E9,1E,C732 
87,79,FC,F0,F0,F3,FF,FF,FF,FF,01,97,3D,FF,FF,FF,D3CF 
FF,FC,F0,F0,F3,F8,F0,F0,F1,E9,1E,87,79,E9,D2,B4,E0DC 
79,E9,D2,B4,F1,E9,96,87,79,E9,96,A5,79,E9,96,A5,EBF5 
79,E9,1E,87,79,FC,F0,F0,F3,FF,FF,FF,FF, 04,97, 44,F71F 
FF,FF,FF,FF,FC,F0,F0,F3,F8,F0,F0,F1,E9,1E,87,79,04BA 
E9,D2,B4,79,E9,D2,F0,79,E9,96,E1,79,E9,96,E1,79,1078 
E9,96,C3,79,E9,1E,C3,79,FC,F0,F0,F3,FF,FF,FF,FF,1D41 
02,8F,3B,FF,FF,FF,FF,FC,F0,F0,F3,F8,F0,F0,F1,E9,2A8A 



570 
575 
58e 
585 
59e 
595 

60e 

605 
610 
615 
620 
625 
63e 
635 
64e 
645 
65e 
655 
66» 
665 
67e 
675 
68e 
685 
69e 
695 

70e 

705 
710 
715 
720 
725 
730 
735 
740 
745 

75e 

755 
76e 
765 
77e 
775 
78e 
785 

79e 

795 

80e 

805 
810 
815 
82e 
825 
83e 
835 
84e 
845 
85e 
855 



DATA 1E 


C3 


79 


E9 


D2 


D2 


.79 


E9 


D2 


D2 


79, E9 


96 


,87, 


DATA 96 


A5 


79 


E9 


96 


A5 


79 


E9 


1E 


87 


79, FC 


F0 


FO, 


DATA FF 


FF 


FF 


00 


77 


2D 


^F 


FF 


FF 


.FF 


FC,F0 


.F0 


,F3, 


DATA F0 


FI 


E9 


1E 


87 


79 


E9 


D2 


B4 


79 


E9.D2 


B4 


79, 


DATA 87 


79 


E9 


96 


El 


79 


,E9 


96 


C3 


,79 


E9,1E 


C3 


79, 


DATA F0 


F3 


FF 


FF 


FF 


FF 


08 


B7 


37 


FF 


FF, FF 


FF 


FC, 


DATA F3 


F8 


F0 


F0 


■ FI 


F8 


,96 


87 


79 


,F8 


1E,B4 


79 


F8, 


DATA 79 


F8 


96 


A5 


79 


F8 


96 


A5 


79 


F8 


1E,A5 


^9 


F8, 


DATA 79 


FC 


F0 


F» 


F3 


FF 


,FF 


FF 


FF 


,05 


,8F, 40 


FF 


FF, 


DATA FC 


F» 


FÔ 


F3 


F8 


F0 


F0 


FI 


F8 


96 


El, 79 


F8 


1E, 


DATA F8 


96 


El 


79 


F8 


96 


,E1 


79 


F8 


96 


El, 79 


F6 


»1E, 


DATA F8 


1E 


C3 


79 


FC 


FÙ 


F0 


F3 


FF 


FF 


FF, FF 


01 


B7, 


DATA FF 


FF 


FF 


FC 


F0 


F0 


,F3 


F3 


F0 


F0 


F1,F8 


,96 


,87, 


DATA 1E 


B4 


79 


F8 


96 


F0 


79 


F8 


96 


87 


79, F8 


96 


96, 


DATA 1E 


96 


79 


F8 


1E 


87 


79 


FC 


F0 


F0 


F3,FF 


FF 


,FF, 


DATA 8F 


2C 


FF 


FF 


FF 


FF 


FC 


F0 


F0 


F3 


F8.F0 


F0 


FI, 


DATA 87 


FI 


F8 


1E 


A5 


FI 


,F8 


96 


El 


FI 


F8,96 


C3 


79, 


DATA F0 


79 


F8 


1E 


96 


79 


F8 


1E 


87 


79 


FC,F0 


F0 


F3, 


DATA FF 


FF 


07 


B7 


27 


FF 


,FF 


FF 


FF 


FC 


F0,F0 


F3 


F8, 


DATA FI 


F8 


96 


87 


79 


F6 


1E, 


B4 


79 


F8 


96, B4 


79 


F8, 


DATA 79 


F8 


9fc 


87 


3D 


FB 


1E 


87 


79 


FB 


1E,F0 


79 


FC, 


DATA F3, 


FF 


FF 


FF 


FF 


03 


B7 


21 


FF 


FF 


FF, FF 


FC 


F0, 


DATA F8 


F0 


F0 


FI 


F8 


96 


87 


79 


F8 


1E 


B4,F1 


FB 


96, 


DATA F8, 


96 


El 


79 


F8 


96 


El, 


79 


F8 


1E 


A5,79 


F8 


1E, 


DATA FC 


F0 


F0 


F3 


FF 


FF 


FF 


FF 


0A 


8F 


34, FF 


FF 


FF, 


DATA F0, 


F0 


F3 


F8 


F0 


F0 


Fi, 


F8 


96 


87 


79, F8 


1E 


B4, 


DATA 96 


B4 


FI 


F8 


96 


87 


79 


F8 


96 


A5 


79, F8 


1E 


A5, 


DATA 1E, 


87 


79 


FC 


Fy 


F0 


F3, 


FF 


FF 


FF 


FF,0B 


B7 


26, 


DATA FF 


FF 


FC 


F0 


F0 


F3 


F8 


F« 


F0 


FI 


F8,96 


87 


79, 


DATA B4, 


79 


F8 


96 


F0 


79 


F8, 


96 


El 


79 


F8,96 


El 


79, 


DATA C3 


79 


F8 


1E 


C3 


79 


FC 


FO 


F0 


F3 


FF, FF 


FF 


FF, 


DATA 04, 


FF 


FF 


FF 


FF 


FC 


F0, 


F y 


F3 


FB 


F0.F0 


FI 


F8, 


DATA 79 


F8 


1E 


D2 


79 


F8 


96 


D2 


79 


F8 


96,87 


79 


F8, 


DATA 79, 


F8 


1E 


A5 


79 


F8 


1E, 


87 


79 


FC 


F0,F0 


F3 


FF, 


DATA FF 


07 


7F 


OE 


FF 


FF 


FF 


FF 


FC 


F0 


F0,F3 


F8 


FÔ, 


DATA F8, 


96 


87, 


79 


F8 


1E 


B4, 


79 


F8 


96 


B4,79 


FB 


96, 


DATA F8 


96 


El 


79 


F8 


1E 


C3 


79 


F8 


1E 


C3,79 


FC 


F0, 


DATA FF, 


FF 


FF 


FF 


09 


B7 


19, 


FF 


FF 


FF 


FF,FC 


F0 


F0, 


DATA F0 


F8 


FI 


E9 


1E 


87 


79 


E9 


D2 


B4 


79, F8 


D2 


B4, 


DATA 1E, 


A5, 


79, 


E9 


78, 


A5 


79, 


E9\ 


5A 


A5 


79, E9 


1E 


87, 


DATA F0 


Ft< 


F3 


FF 


FF 


FF 


FF, 


03 


9F 


2A 


FF, FF 


FF 


FF, 


DATA F0, 


F3, 


F8, 


F0 


F« 


FI 


E9, 


1E, 


El 


79 


E9,D2 


C3 


79, 


DATA El 


79 


E9 


1E 


El 


79 


E9, 


78 


El 


79 


E9,5A 


C3 


79, 


DATA C3, 


79 


FC, 


F0 


FO 


F3 


FF, 


FF 


FF 


FF, 


08,67 


0L 


FF, 


DATA FF 


FC 


Ffl 


F0 


F3 


F8 


F0 


F0 


FI 


E9 


1E,87 


79 


E9, 


DATA 79, 


F8 


D2, 


F0 


79, 


E9 


1E, 


87 


79 


E9, 


78,96 


FI 


E9, 


DATA 79 


E9 


1E 


87 


79 


FC 


FO, 


F0 


F3 


FF 


FF, FF 


FF 


0B, 


DATA FF, 


FF, 


FF, 


FF 


FC, 


F0 


FO, 


F3, 


F8 


F0 


F0,F1 


E9 


1E, 


DATA E9 


D2 


A5 


FI 


F8 


D2 


El 


FI 


E9 


1E 


Li-Jj / 7 


E9 


78, 


DATA E9, 


5A, 


96, 


79 


E9, 


1E 


87, 


79, 


FC 


F0 


F0,F3 


FF 


FF, 


DATA 06 


7F 


11 


FF 


FF 


FF 


FF 


FC 


F0 


F0 


F3.F8 


F0 


Fe, 


DATA 1E, 


87, 


79, 


E9 


D2, 


B4 


79, 


F8, 


D2 


B4 


79, E9 


1E 


B4, 


DATA 78 


87 


3D 


E9 


5A 


87 


79, 


E9 


1E 


F0 


79, FC 


F0 


F0, 


DATA FF, 


FF, 


FF, 


FF 


00, 


00 


00, 


67, 


0F 


0C, 


00,00 


00 


00, 


DATA 08 


01 


06 


00 


00 


00 


00 


00 


01 


00 


01,06 


00 


00, 


DATA 00, 


01, 


00 


01 


0F, 


7F 


0E, 


00, 


00 


00 


01,00 


21 


0F, 


DATA 00 


00 


00 


01 


88 


41 


IF, 


FF 


0F 


00 


00,00 


01 


44, 


DATA 6F, 


0F, 


00, 


00 


00, 


01 


AA, 


51, 


DF 


8F 


0F, 00 


00 


00, 



79, E9, 3558 
F3,FF,407E 
F8,F0,4DD2 
E9, 96, 5909 
FC,F0,63CC 
F0,FÔ,7179 
96,B4,7D48 
1E.87.86EA 
FF,FF,93FE 
C3,79,A'0D0 
C3,79,ABDA 
18,FF,B7C6 
79,F8,C5E1 
F1,F8,D0BE 
FF,09,DBD5 
F8,96,E9B2 
F8,96,F58E 
FF,FF,00FF 
F0,F0,0E85 
96, B4, 1944 
F0,F0,2380 
F0,F3,3115 
87,79,3CB5 
87,79,46CF 
FF, FC, 545F 
79,F8,60C4 
79,F8.6B65 
FF, FF, 7734 
F8,1E,846E 
F8,1E,8F78 
05,B7,9B8D 
96,C3,A976 
96,A5.B3EA 
FF,FF,BF79 
F0,F1,CCAO 
87,79,D6BA 
F0,F3,E215 
F3.F8,EFAD 
79,E9,FB4D 
79,FC,046C 
FCF0.11EF 
F8,D2,1EBD 
E9,1E,28B9 
FF, FF, 3538 
D2,B4,4245 
5A,96,4CB9 
8F,3C,57DA 
87,F1,65ED 
F0,79,71E7 
FF,FF,7E0B 
F1,E9,8B1E 
79, E9, 9538 
F3,FF,9FF5 
00, 10,A4A3 
00,00,A4BA 
7D,8F,A695 
41,7F,A991 
01,88,AD11 



77 




866 DATA 71,6F,3F,8F,00,40,00,03,18,D7,8F,F8,EF,O0,62,0O,B2C9 
865 DATA 03, 19,6F, IF, F7,FF, 00,72,00,03,7F, 8F, 3E,FF,FF,88,B9B0 
870 DATA 77,88, 13,CC,0F,-3E,EF,FF,88,73,FD,77,0F,OF,7F,FC,C1D1 
875 DATA F7,CC,77,ED,EF,7F,0F,7F,AD,B7,CC,77,FE,A1,FB,DA,CD0F 
880 DATA 7B,FC,B7,CC,77,CE,13,F7,ED,B7,EF,6F,88,67,88,31,D702 
885 DATA FD,DE,7B,FF,EF,88,6?,88,13,FF,4F,1F,FF,DF,OO,57,E072 
890 DATA 00,00,EF,88,00,FF,2E,00,EE,00,00,77,00,0O,33,88,E536 
895 DATA 00,00,00,00, 00,00, 00,00,00, 11, FF, O0,00,00,00,0O,E646 
9O0 DATA 00,00,00, 77, FF, 0F,88,00,00,O0,00,00,33,FF,CF,1F,EA73 
905 DATA 6F, 88,00, 00,00,00, FF, EF, OF, 5F, DF, 6F, 88,00,BO,FO,F13C 
910 DATA F0,8F,2F,FF,5F,DF,6F,CC,00,A4,A0,A0,BF,AF,FF,5F,FB12 
915 DATA DF,6F,CC,00,B4,FO,FO,8F,2F,0F,4F,1F,0F,EE,00,83,027B 
920 DATA 00,00,FF,FF,FF,FF,FF,FF,EE,00,F0,80,0O,00,00,00,0AD3 
925 DATA 00, 11, 0F,2E, 00,05,00,00,00,00,00,00, 11, 7F,BF,OO,0C75 
930 DATA 70,00,00,00,00,00,00, 11,7F, BF, 00, 02, OO, 00, 00,00, 0E36 
935 DATA 11,FF,FF,0F,3F,0O,O2,0O,00,OO,0O,77,F8,FF,FF,FF,1501 
940 DATA 88,02, 00, 00, OO, 11, FC,F7, FI, FF,OF, 88,02,00,00,00, 1A18 
945 DATA 77,C0,DD,98,F7,6F,CC,02,00,0O,00,FC,0F,A8,8F,79,21B3 
950 DATA 8F,CC,04,0O,O0,11,C8,00,DD,88,10,FF,CC,04,O8,O0,2737 
955 DATA 77,F7,0F,7F,0F,7F,F7,8C,03,00,0Ô,FE,DD,8B,00,00,2DAA 
960 DATA DD,FB,8C, 00,00, 11, FE,A8,9E,F0,87,A8,FB, 08,00,00,3585 
965 DATA 11,FE,DD,98,0F,08,DD,CB,00,00,00,00.00,F7,O7,0F,3AD5 
970 DATA 0F, 7F, 80, 00, 00, 00, OO, OO, 50, 50, 50, 50, 50, 00,00,00,3D73 
975 DATA 0O,77,7F,FF,FF,00,00,0O,OO,00,00,77,FF,BF,3F,O0,42DB 
980 DATA 00,00,O0,O0,11,FF,2F,FF,FF,7F,88,3O,FF,8B,11,7F,4966 
985 DATA FF,'EF,FF,4F,CC,61,OF,0C,11,DF,FF,FF,FF,7F,EE,00,5344 
990 DATA OE,0O,11,FF,O0,DF,9F,5D,4E,30,FF,88,11,EE,O0,FF,5A40 
995 DATA FF,19,EE,61,0F,0C,11,6E,00,67,FF,08,C0,0O,0E,00,5F7D 
100O DATA 11,EE,00,77,EF,18,4A,30,FF,88,11,EE,0O,57,6F,08,65C8 
1005 DATA 84,61, 0F,0C,11,6E,0O,77,EF,0B,OO,0O,OE,0O,11,EE,69C2 
ÎOIO DATA 0O,FO,F7,AA,AA,AA,AA,AA,11,EE,11,FF,FF,8F,7F,FF,7416 
1015 DATA FF,EE,0O,C0,33,O5,O5,47, 8D, 05,03, OC, 00,84,23, 1B,78AA 
1020 DATA CE,3B,1B,CF,77,EE,OO,84,01,36,EF,05,36,EF,47,2E,7F4B 
1025 DATA 00,84,01, 7D,FF,0A,7D,FF,47,2A,00,84,00,7F,F7, 05,8542 
1030 DATA 77,F7,47,2A,00, CC, 00,7F, DF,0A,7F,DF, 77, 66,77, FF,8D06 
1035 DATA 08,37, AF,0F,3F,AE,33,CC,9F,5F,0C,11,CC,00,U,CC,92B3 
1040 DATA OO, OO, OO, 00, OO, OO, 00, 20, OO, 00, OO, OO, OO, OO, 02, 00, 92D5 
1045 DATA OO, 00, OO, OO, 00,02, 00, OO, OO, 00,00,00,02,00, OO, OO, 92D9 
1O50 DATA OO, 00, 0O, 02, OO, OO, OO, 00, OO, OO, 02, 00, 00, OO, 00, OO, 92DD 
1055 DATA O0,O2,00,00,O0,OO,OO,OO,77,00,00,00,F0,F0,FO,E1,9707 
1060 DATA CO,0O,30,F0,F0,F0,F0,69,OC,61,C3,C3,0F,OF,2C,04,9E61 
1065 DATA FO,F0,FO,F0,F0,E1,OE,0F,0F,0F,0F, OF, 0E,O2, 05,05, A465 
1070 DATA 05, 05,05,07, OE,02,0A,28,AO,82,OA,02,O1, 14, 44.00.A644 
1075 DATA 64,05,0C,00,48,EE,00,EE,80,08,0O,O0,44,04,44,20,AA11 
108O DATA 08,10,44,0O,OA,O0,45,0O,O0,EE,O3,01,08,FE,0O,1O,ACC4 
1085 DATA 44,O0,0O,00,44,00,00,A0,A0,A0,A0,AO,O0,00,OO,OO,BO6C 
1090 DATA 00,00, 00,10, OO, OO, OO, 00, OO, OO. OO, OO, Ol, 00, OO, 00, B07D 
1095 DATA OO, 00, OO, OO, OO, Ol, OO, OO, 00, OO, OO, 00, 00, OO, Ol, OO, B07F 
110O DATA 0O,00,OO,00,00,00,00,3O,68,0O,00,00,FO,78,B4,D2,B405 
1105 DATA F0,B4,0E,0O,30,E1,0F,0F,0F,0F,1E,81,OO,FO,F0,F0,BA73 
1110 DATA FO,F0,F0,F0,C3,0B,0D,05,O5,05,O5,O5,O5,O4,08,0A,BF3F 
1115 DATA OA,0A,0A,0A,0A,OA,0F, 08,05,50,50, 50,50, 50, 40,O4,C16B 
1120 DATA 08, 12,00,88,00,00,22, 10,07, OO, OO, 99,44,O0,0O,55,C378 
1125 DATA 22,08,00, 11, 44,89,0F, OF, 22,55,00,00, 10,88,O3,O0,C5BO 
1130 DATA Ol, 08, 32, OO, OO, 00, 50, 50, 50, 50, 50, 40, OO, OO, OO, O0,C7BB 
1135 DATA 00,00,00,00,00, O0,0O,00,00,0O,F0,FO,F0,F0,00,00,CB7B 
1140 DATA 00, 00,00, OO, 00, 00,00, 0O,OO,0O,0O,0O,F3,FF,FF,FC,CF68 
1145 DATA 00, 00, OO, 00, OO, OO, 00, OO, OO, OO, 00,00, OO, 00, F7, FF, D15E 



1150 
1155 
1160 
1165 
1170 
1175 
1180 
1185 
1190 
1195 
1200 
1205 
1210 
1215 
1220 
1225 
1230 
1235 
1240 
1245 
1250 
1255 
1260 
1265 
1270 
1275 
1280 
1285 
1290 
1295 
1300 
1305 
1310 
1315 
1320 
1325 
1330 
1335 
1340 
1345 
1350 
1355 
1360 
1365 
1370 
1375 
1380 
1385 
1390 
1395 

1400 

1405 
1410 
1415 
1420 
1425 
1430 
1435 



DATA FF, FE, 00, OO, 00,00, OO, OO, 00, 00, OO, OO, OO, 00, OO, OO, D35B 
DATA E7, IF, 8F, 7E, 00, OO, OO, OO, OO, OO, OO, OO, 00, OO, 00, OO, D56E 
DATA O0,OO,E7,DF,BF,7E, 00,00,00, OO, OO, 00,00,00,00,00,0871 
DATA 00,00,00,00,E7,DF,BF,7E,00,00,00,00,70,F0,E1,C0,DE75 
DATA 00,00,00, O0,O0,O0,E7, 9F, AF,7E, 00,00,00, 10,F0,4B,E273 
DATA 87,68,FO,FO,0O,00,OÔ,OO,E7,9F,AF,7E,O0, 00,00, 70,EB65 
DATA FO,F0,F0,FO,F0,F0,80,00,O0,00,E7,9F,AF,7E,O0,00,F138 
DATA 00,OF,0F,OF,0F,OF,0F,0F,68,0D,O5,O0,E7,1F,8F,7E,F42E 
DATA Ol, 05,06,03,58,50,50, 50,50, 43, 0B,0F,OF, OC, F3,FF,F83F 
DATA FF,FC,03,0F,0E,00,A2,03,00,00,0C,A9,00,22,22,06,FBFE 
DATA F0,FO,FO,F0,06,44,44,00, 77,00,00,00, 11, CC,00,55,01F5 
DATA 55,03,0F,OF,0F,0F,0C,AA,AA,0O,22,A0,A0,AO,AO,88,0713 
DATA 00,22,22,00, 00,00,00,00, OO, 44,44, 00,B4,F3,52,E6,0ABE 
DATA 21,C4,21,C4,B4,F3,52,E6,21,C4,21,C4,B4,F3,52,E6,1410 
DATA 21, C4,21,C4,O0, 11, 00,31, 88,71, CC,F3,EE,F3,EE,F7,1C9A 
DATA EE,FF,CE,FF,CE,FF,CE,FF,BE,77,8C,23,08,55,44,99,26DC 
DATA 22,F3,EE,F7,CE,FF,8E,DF,1O,F1,EE,00, 11, FF, OE, 00,3010 
DATA 33,7F,8F,00,77,FF,CF,O8,DF,FF,EF,OC,FF,FF,EF,0C,397D 
DATA DE,F0,E1,0C,FE,80,E1,0C,DE,D0,E1,OC,FE,F0,E1,OC,4419 
DATA DE,D0,E1,0C,EE,70,21,OC,DE,7O,61,OC,FE,FO,E1,0C,4CD5 
DATA DF,FF,EF,OC,77,FF,CF,OB,33,7F,8F,00,11,FF,OE,O0,545A 
DATA 84,84,84,84,84,00,00, 00,0O,84,84,84,84,O0,OO,0O,58FE 
DATA 00, 84,84,84, 84, 00,00, 00,00,84, 84,84, 84, OO, 00, 00,5D1E 
DATA OO, 84, 84, 84, 84, OO, 00, OO, OO, 84, 84, 84, 84, OO, 00, 00, 613E 
DATA 00,84, 84, 84,84,00, OO, 00,00,84,84,84,84,00,00, 00,655E 
DATA 00,84,84, 84,84,00,00, OO, 00,84,84,84,84,O0,O0,00,697E 
DATA OO, 84, 84, 84,84, OO, OO, OO, 00,84, 84, 84, 84, OO, OO, OO, 6D9E 
DATA 00,0F,OF,0F,0F,OF,0F,OF,O8,70,F0,F0,F0,FO,FO,FO,741F 
DATA 08, 00,84,84,84,00,00,00,80, 00,84,84,84, O0,0t3,OO,77BF 
DATA B0,00,0F,0F,0F,0F,0F,08,80,00,70,F0,FÔ,F0,FÔ,0C,7D4E 
DATA 80, OO, 00, 84, 84, OO, OO, 84, 80, OO, OO, 84, 84, 00, 00, 84, 816û 
DATA 8O,O0,O0,OF,0F,0F,08,84,80,0O,0O,7O,F0,F0,OC,84,85FF 
DATA 80, OO, 00,00, 84, 00,84,84, 80, 00,00,00,84,00, 84,84,8A17 
DATA 80,00,00,00,10,00,00,00,00, 10, 00,00, OO, OO, 10,20, 8AE7 
DATA OO, OO, OO, 10,20, OO, OO, OO, 10, FO, OO, 00,10,60, 40,00,8017 
DATA O0, 10, 50,80, OO, OO, 10, BO, OO, OO, OO, 10, 10, OO. 00,00. 8ED7 
DATA 33,FE,88,OO,OO,FF,FF,E6,O0,33,FF,FF,F9,88,77,FF,989C 
DATA FF,FC,CC,0F,OF,OF,0F,0E,FF,FF,FF,FC,EE,EC,D9,B2,A3OB 
DATA 74,CA,0F,0F,0F,OF,OE,67,7F,FF,FC,CC,33.3F,FF,F9,AAAA 
DATA 88,0O,DF,FF,E6,Ô0,00,23,FE,88,00,00,22, 11, 00,88, B05A 
DATA 77, 33,99,CC,20, 10,00,80, 77, 33, 99, CC, 20, 10,00,80, B5D8 
DATA 77,33,99,CC,FF,FF, FF, EE, 88, 00,00,22, AA,AA,AA,AA,BF24 
DATA AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,C9C4 
DATA AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,AA,D464 
DATA AA,AA,AA,AA,B8,00,00,22,FF,FF,FF,EE,AA,AA,AA,AA,DE49 
DATA 44,44,44,44, AA,AA,AA,AA,00, OO, 44,00,22,00,O0,EE,E355 
DATA OO, 77,00,00,40,00,20,00, 0O,EE,0O,77, OO, 0O,4O,O0,E5D1 
DATA 20,0O,0O,EE,00,77,00,11,FF,FF,FF,CC,11,00,00,OO,EB41 
DATA 44, FF, 55, 55, 55, 77, 11,55,55,55,44, 11, 55,55,55, 44,F0A2 
DATA 11,55,55,55,44, 11,55,55,55,44, 11,55,55,55,44, 11, F4AF 
DATA 55, 55, 55, 44, 11, 55, 55, 55, 44, 11, 55, 55, 55, 44, FF, 55, F9EE 
DATA 55,55,77, 11,00,00,00,44, 11, FF, FF, FF,CC, 11, 55,55,FFF9 
DATA 55,44,00,88,88,88,88, 11, 55,55,55,44, FF, FF, 00,00,0604 
DATA BO, 10,00,00,00, 11, CC, 33, 88,00,00,00,80, 10,00,00, 08BC 
DATA 0O,11,CC,33,88,OO,0O,FF,FF,FF,FF,00,00,88,O0,00,0ED8 
DATA 11,00,FF,FF,FF,FF,FF,FF,89,OF,0F,0F,0F,19,BB,FF,177B 
DATA FF,FF,FF,DD,89,0F,0F,0F,0F,19,BB,FF,FF,FF,FF,DD,21C7 
DATA BB,FF,FF,FF,FF,DD,89,OF,OF,0F,OF, 19,BB,FF,FF,FF,2BF1 



78 




1440 DATA 
1445 DATA 
1450 DATA 
1455 DATA 
1460 DATA 
1465 DATA 
1470 DATA 
1475 DATA 
1480 DATA 
1485 DATA 
1490 DATA 
1495 DATA 
1500 DATA 
1505 DATA 
1510 DATA 
1515 DATA 
1520 DATA 
1525 DATA 
1530 DATA 
1535 DATA 
1540 DATA 
1545 DATA 
1550 DATA 
1555 DATA 
1560 DATA 
1565 DATA 
1570 DATA 
1575 DATA 
1580 DATA 
1585 DATA 
1590 DATA 
1595 DATA 
1600 DATA 
1605 DATA 
1610 DATA 
1615 DATA 
1620 DATA 
1625 DATA 
1630 DATA 
1635 DATA 
1640 DATA 
1645 DATA 
1650 DATA 
1655 DATA 
1660 DATA 
1665 DATA 
1670 DATA 
1675 DATA 
1680 DATA 
1685 DATA 
1690 DATA 
1695 DATA 
1700 DATA 
1705 DATA 
1710 DATA 
1715 DATA 
1720 DATA 
1725 DATA 



FF 


DD 


89 


0F 


,0F 


,0F 


,0F, 19, 


m 


00 


11 


00 


00 


FF 


FF, FF, 


00 


30 


00 


,00 


C0 


,00 


,00,FF, 


D0 


11 


FF 


00 


00 


00 


00,00, 


FF 


F9 


F4 


F7 


88 


,00 


,00,77, 


FF 


FF 


FF 


F8 


ce 


00 


77, FF, 


FF 


FF 


FF 


FF 


,EE 


,11 


,FF,BA, 


F0 


F0 


C2 


FF 


FF 


33 


FF,7A, 


89 


IF 


8E 


8F 


08 


,77 


,FF,71, 


07 


1E 


8F 


8F 


08 


IF 


FF,71, 


FF 


(FF 


8E 


6F 


,08 


,F0 


,7F, 79, 


FF 


FF 


8E 


8F 


08 


70 


B7,71, 


FF 


FF 


8F 


8F 


,7F 


,30 


,B7,71, 


0F 


0F 


4E 


FF 


EE 


10 


B7,0B, 


05 


0A 


0A 


,FF 


,88 


,00 


,1F,C8, 


00 


00 


00 


00 


00 


00 


00,00, 


00 


00 


00 


00 


,00 


, 00 


,00,17, 


F0 


C0 


00 


00 


00 


00 


00,00, 


00 


00 


00 


,00 


,00 


,00 


,00,00, 


FF 


F0 


F0 


F0 


F0 


F0 


F0,F0, 


00 


00 


00 


00 


00 


,00 


,00,00, 


9F 


FF 


FF 


F3 


FF 


FF 


FF, FF, 


00 


00 


00 


00 


00 


,00 


00,00, 


FF 


8F 


3F 


FF 


FB 


FF 


FF,FF, 


00 


00 


00 


,00 


,00 


,00 


,00,00, 


0F 


0F 


0F 


0F 


7F 


CB 


ÔF, 0F, 


00 


00 


00 


, 00 


,00 


, 00 


,00,00, 


0F 


0F 


0F 


0F 


0F 


IF 


CB.0F, 


00 


00 


00 


00 


,00 


,00 


,00,00, 


00 


00 


00 


00 


03 


0F 


0F, C8, 


C8 


00 


00 


00 


00 


,00 


,00,00, 


00 


00 


00 


00 


00 


00 


08, FC, 


17 


C8 


00 


00 


00 


00 


00,00, 


00 


00 


00 


00 


00 


00 


00,0F, 


00 


17 


C8 


00 


00 


00 


00,00, 


00 


00 


00 


00 


00 


00 


00,00, 


00 


m 


17 


C8 


00 


00 


00,00, 


00 


00 


00 


00 


00 


00 


00,00, 


00 


00 


00 


17 


ce 


00 


00,00, 


00 


00 


00 


00 


00 


00 


00,00, 


00 


00 


00 


00 


17 


C8 


00,00, 


00 


00 


00 


00 


00 


00 


00,00, 


00 


00 


00 


00 


00 


17 


C8,00, 


00 


00 


00 


00 


00 


00 


00,00, 


00 


00 


00 


00 


00 


00 


17, C8, 


00 


00 


00 


00 


00 


00 


00,00, 


00 


00 


00 


00 


00 


00 


00, 17, 


00 


00 


00 


00 


00 


00 


00,00, 


00 


00 


00 


00 


00 


00 


00,00, 


36 


00 


00 


00 


00 


00 


00,00, 


C8 


00 


00 


00 


00 


00 


00,00, 


07 


7C 


F0 


00 


00 


00 


00,00, 


17 


C8 


00 


00 


00 


00 


00,00, 


F0 


87 


7F 


FC 


F0 


F0 


F0,F0, 


00 


17 


C8 


00 


00 


00 


00,00, 


FF 


FF, 


8F 


0F 


3E 


FF 


FF, FF, 


00 


00 


17 


C8 


00 


00 


00,00, 


FF 


FF, 


FF 


8F 


0F 


3E 


FF, FF, 



FF,FF,FF,FF,FF,FF,00,88,352D 
FF,00,00,30,00,00,C0,00,3A2A 
FF, FF, FF, 00, 00, 00, 00, 00, 3F16 
33, FF, FF, EE, 00, 00, «10, 11,4356 
FB,FF,FE,F1,CC,00,11,FF,4DFD 
FF,FF,FF,FF,E6,00,FF,FF,5B14 
0A,05,15,FF, FF, 33,FF, 34,6520 
F0,F0,C7,CF,FF,77,FF,71,71C8 
07,1E,8E,8F,7F,FF,FF,79,79B4 
8F, 79, 8E, 8F, 7F, El , FF, 71 ,8183 
FF,FF,8F,8F,7F,F0,3F,71,8BC9 
FF,FF,8E,8F,7F,70,B7,79,95BE 
FF,FF,8E,8F,6E,30,B7,63,9F84 
0F,0F,0D,FF,CC,00,B7,05,A561 

00 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , A7E8 
00, 00, 00, 00, 00, 00, 00, 00, A7E8 

EC,00,00,00,00,00,70,F0,AA4B 

00, 00, 00, 00, 00, 00, 00, 00, ABFB 

07,FE,F0,F0,F0,F0,F0,F7,B2A7 

F0, F0, C0, 00, 00, 00, 00, 00, BCD6 

00,03,7F,FF,FF,FF,FF,FF,C253 
FF,FF,FF,FC,00,00,00,00,CDD8 
00, 00, 03, 3F, FF, FF, FF, FF, D216 
FF,FF,FF,FF,FF,80,00,00,DE55 
00,00,00,01, 0F,0F,0F,0F,DE92 
0F, 0F, 0F, 0F, 0F, 7F, 80, 00, E180 
00, 00, 00, 00, 00, 07, 0F, 0F, E1A5 
0F,0F,0F,0F,0F,0F,3F,C8,E44A 

00, 00, 00, 00, 00, 00, 00, 00, E44A 
00,00,00,00,00,00,00, IF, E552 
00, 00, 00, 00, 00, 00, 00, 00, E61A 
00, 00, 00, 00, 00, 00, 00, 00, E71E 
00, 00, 00, 00, 00, 00, 00, 00, E7FD 
EC,00,00,00,00,00,00,00,E8F8 
00, 00, 00, 00, 00, 00, 00, 00, E9D7 
0F,EC,00,00,00,00,00,00,EAD2 
00, 00, 00, 00, 00, 00, 00, 00, EBB1 
00, 17, C8, 00, 00, 00, 00, 00, EC90 
00, 00, 00, 00, 00, 00, 00, 00, ED6F 
00,00, 17,C8,00,00,00,00,EE4E 
00,00,00,,30,F0,E0,00,00,F12D 
00,00,00, 17,C8, 00, 00, 00,F20C 

00,00,00,00, 03,3E,EE,00,F41A 
00,00,00,00, 17, C8, 00, 00, F4F9 
00, 00, 00, 00, 00, 00, 36, 00, F60E 
00,00,00,00,00, 17, C8, 00, F6ED 
C8,00,00,00,00,00,00,36,F802 

00,00,00,00,00,00, 17, C8,F8E1 
17, C8, 00, 00, 00, 00, 00, 00, F9C0 
00,00,00,00,00,00,00, 17, FA0D 

00, 17, EC, 00, 00, 00, 00, 00, FBD8 

00, 00, 00, 00, 00, 00, 00, 00, FD4B 

00,00,07,FE,F0,F0,F0,F0,02EF 

00, 00, 00, 00, 00, 00, 00, 00, 09A1 

00,00, 00,03,7F, FF, FF, FF, 0DFF 

FF, C0, 00, 00, 00, 00, 00, 00, 1595 

00,00,00,00,03,3F, FF, FF, 18B4 
FF, FF, EC, 00, 00, 00, 00, 00, 2175 



1730 DATA 
1735 DATA 
1740 DATA 
1745 DATA 
1750 DATA 
1755 DATA 
1760 DATA 
1765 DATA 
1770 DATA 
1775 DATA 
1780 DATA 
1785 DATA 
1790 DATA 
1795 DATA 
1800 DATA 
1805 DATA 
1810 DATA 
1815 DATA 
1820 DATA 
1825 DATA 
1830 DATA 
1835 DATA 
1840 DATA 
1845 DATA 
1850 DATA 
1855 DATA 
1860 DATA 
1865 DATA 
1870 DATA 
1875 DATA 
1880 DATA 
1885 DATA 
1890 DATA 
1895 DATA 
1900 DATA 
1905 DATA 
1910 DATA 
1915 DATA 
1920 DATA 
1925 DATA 
1930 DATA 
1935 DATA 
1940 DATA 
1945 DATA 
1950 DATA 
1955 DATA 
i960 DATA 
1965 DATA 
1970 DATA 
1975 DATA 
1980 DATA 
1985 DATA 
1990 DATA 
1995 DATA 
2Ô00 DATA 
2005 DATA 
2010 DATA 
2015 DATA 



00 , 00 , 00 , 1 7 , C8 , 00 , 00 , 00 , 00 , 00 , 00 , 00 , W , 1 , 0F , ÔF ,2273 
0F, 0F, 0F, 0F, 0E, 00, 36, 0F, 0F, 0F, IF, EC, 00, 00,00, 00, 242B 

00,00,00,00, 17, C8,00, 00, 00, 00, 00, 00, 00, 00, 00, 07, 2511 

0F,0F,0F,0F,0F,0F,0F,0F,0F,0F,0F,0F,FE,00,00,00.26C3 

00, 00, 00, 00, 00, 17, C8, 00, 00, 00, 00, 00, 00, 00, 00. 00, 27A2 

00, 00, 00, 00,00, 00, 77, FF, FF, 00, 00, 00, 03, 7E, 00, 14, 24AC 
A7,00,0B,87,0C,09, 67, 08,04,67, 30,04,4F, 0C,03,2F,2D95 
04,07,2F, 1C,03,2F, 40, 00,04, 87, 08,04, 4F,08,04,4F,2F9E 
1C,07,67,2C,04,87,38,07,67,40,04,2F,4C,00,54,57,32EF 
09,15,BC,1E,0C,5C,02,0C,73,12,0C,5C,02,0C,73,14,35DF 
0C,5C,02,0C,73,16,52,5D,05,15,9C,2A, 52,50,05, 15,3936 
44,24,91, 5C,08,18,7F,20,C6, 5F, 21, 18,9F, 06,00,02, 3D4F 
A7, 00,04, A7,0C,05,A7,30,02,87,3C,02,7F,1C,02,7F,416L 
28,05,57,08,0E,2F,04,02,2F,44,00,04,2F,00,0A,A7,4392 
08,05,7F, 18,0A,7F,24,05,A7,2C,0B,87, 38,0F, A7, 44,477F 
04,2F,4C,00,12,58,0B, 17,46, 10,52,50,05, 15,BC,33,4A98 
E3,59,07,16,BD,40,0C,5C,02,0C,97,1A,48,5C,04,12,4ECF 
41,29,0C,5C,02,0C,8B,1A,0C,5C,02,0C,3B,2E,19,5E,51AA 
05,17,BE,0C,00,05,A7,05,07,A7,34,04,7F,34,09,7F,55ô2 
0C,03,5F, 13, 02,5F,23,03,57,30, 02,57,40,01, 57, 4C,582E 
05,2F, 00,09,2F, IF, 00, «A, 7F, 08, 05, A7, 19, 06,5F, IF, 5A93 
0A,A7,30,05,57,3C,09,57,48,00,8E,5E,06,15,BC,40,5EB7 
25,5C,02,11,70,16,25,5C,02,11,70,18,48,5C,04,12,61A7 
91, 28,52,50,05, 15,94, 12,54,57,09, 15, 44,30,C6,5F,6631 
21, 18,77,0C,00, 13, A7, 00,02, 8F, 1E, 02,8F, 2A,03, 7F, 6993 
08,05, 7F,3C,06,57,00,02,4F,38,03,4F,44, 10,2F, 0B,6C21 
00,05, 7F, 04,04,2F,07,05, 7F, 14.0C8F, 26, 06,7F, 38.6EF9 
04,4F, 40,05,A7,4C,00,10,59,0A,15,BC, 28, 52,5D,05,72A4 
15, 44, 0C, 52,50, 05, 15, 44, 11, 7E,5A, 09, 10,5F, 44,19,7504 
5E,05,17,BE, 14,91, 5C, 08, 18, 47, 38,00, 02,A7, 00,04,7959 
A7,0C, 01, A7, 20,02, A7,2C,06,A7,38,02,8F,1C,01,87,7DC3 
44, 03, 7F, 00, 01, 67, 0C, 03, 67, 14, 04, 67, 30, 01, 4F, 00, 8066 
03,57, 44,05, 4F,08,03, 2F, 04,06, 2F, 1C, 04, 2F, 3C, 00, 8256 
04,4F,04,05,A7,08,03,7F,0C,03,67, 10,05,8F. 18,03,8518 
A7,1C,04,4F,1C,07,67,2C,08,A7,34,0B,87,40,04,C7,8964 
4C,04,2F,4C,00,25,5C,02,11,B8,04,25,5C,02,11.B8,8CCB 
21,0F,5B,12,0E,B6,36,25,5C,02, 11, 60,02,25, 5C,02,8FDB 
1 1,60, 04, 25, 5C, 02, 11, 60, 06, 25, 5C, 02, 11, 68,45,91, 931C 
5C,08, 18,47, 08,00, 02,A7, 00, 02, A7,1C,03,A7,28,06,962D 
A7,38,03,7F, 10,01, 7F,20,01;7F,28,01,7F,30,01, 7F, 9A16 
38,01,7F,40,04,57,00,03,57,1C,06,57,30,01,2F,00,9C9C 
0D,2F, 10,01, 2F,48,00,04,C7,00,05,7F,0C,01,AF,2fa,9F91 
05,A7, 18,05,57, 18,0A,A7,24,0A,A7,34, 05,7F, 44,04,A34F 
2F,44,04,C7,4C,00,7E,5A,09,10,B7,40,48,5C,04,12,A77B 
69, 04, 48, 5C, 04, 12,41, 3C,48,5C,04, 12,41, 40,BC,5D,AB73 
04, 17,46, 1D,00,10,A7,0C,02,8F,0C,04,8F, 20,02, 8F, AE95 
3C,03,6F,0C,03,6F,38,02,6F, 48,05,4F, 0C, 05, 57, 30.B19E 
02,57,48,08,2F, 04,06, 2F,2C,02, 2F, 48,00,0F,A7,08,B412 
08,8F, 1C, 07, 8F, 30, 10,8F, 44,04,C7,48,00,8E,5E,06,B873 
15,BC,26,E3,59,07,16,BD,30,0F,5B,12,0E,3D,0D,BC,BD40 
5D,04, 17,46,38,91, 5C,08,18,67,0E, 00, 04,A7,07,04,C06E 
A7,27,03, A7,3B,01, 6F, 00,02,6F,08,05, 7F, 17,04,7F, C428 
37,01, 57,00,05,57, 08, 05,57,2B,02,57,43,0D,2F,1C,C696 
00,04,C7,07,05,A7,17,05,A7,37,0A,A7,47,0C,6F,04,CA85 
05,7F,2B,05,57,1C,05,57,3F,00,8E,5E,06,15,BC,0D,CE17 
19,5E,05,17,BE,30,8E,5E,06,15,BC,3E,BC,5D,04,17,D2CD 
46,30,48,5C,04,12,69,18,52,5D,05,15,6C,37,00,02,D5EC 
A7, 00, 02, A7,0C,03,A7, 18,04, A7, 34,02, A7,48,05,77,DA56 



79 




2020 DATA 

2025 DATA 
2639 DATh 
2635 DATA 
2046 DATA 
2045 DATA 
2v50 DATA 
2055 DATA 
2060 DATA 
2ot5 DATA 
2o70 DATA 
2075 DATA 
2080 DATA 
2085 DATA 
2o90 DATA 
2o95 DATA 
2lôo DATA 
2105 DATA 
2110 DATA 
2115 DATA 
2i20 DATh 
2125 DATA 
2130 DATA 
2135 DATA 
2140 DATA 
2145 DATA 
2150 DATA 
2155 DATA 
2160 DATA 
21*5 DATA 
2170 DATh 
2175 DATA 
2180 DATA 
2185 DATA 
2190 DATA 
2195 DATA 
2200 DATA 
2205 DATA 
221» DhTh 
2215 DATA 
2220 DATA 
2225 DATA 
2230 DATA 
2235 DATA 
2240 DATA 
2245 DATA 
2250 DATA 
2255 DATA 
2260 DATA 
2265 DATA 
227Ô DATA 
2275 DATA 
2280 DATA 
2285 DATA 
2290 DATA 
2295 DATA 
2300 DATA 
2305 DATA 



14, 03, 77, 28,01, 57, 08,06, 57, 24, 02.57, 40,08, 2F, 04. DCC1 

o9,2F.2C.00.OH,A 7 .O6,o5.57,0L,0*,H7,i4,Oô,A7,2i,DFDS 
06,A7,30,05,57.3C.';h.h7.44.u4.l7,4C,00.;2.55.vÔ.l:;E 
17,BE,O&,E3.5 3 .0'7 > Iq.BD. ïA,48.5C,04. i2,53. 1ù,46.E846 
5C,04,12,41,14,48,5C,04,12.41,18.48,5C,04.12,41,EB1B 
lC,C6,5F,21.1S.6f.20.00.01.A7.00.0i.A7.46.05,A7.EF6fi 
l0,05,A7,28,03,7F,04,02,7F.iC,02.7F,28,03,7F,3C.F2D6 
06, 57 . 04, 05. 57. 30 . 02. 5". 48. 13, 2F. 00. 00, 05. A7. 04.F556 
05. T F.io.o5,57.!C.oF,H r .2 i .i:'5,5 7 .2C.y5. 7F.3d.iW.F5E ; 
C7,44,05.57,44.00,25,5C.02, 11.68.04, 25,5C,02, 11, FBC8 
ùâ,os,25,5C.o2. 11,68,0A,54,57,09, 15,BC,30, 10.39.FF5A 
OA. 15. 44.0C, OC. 5C, 02, OC, 63. 40. OC. 5C. 02. OC, 63. 42. OlFD 
OC. 53, 02. 0C,o3, 44, 12. 56.06,1 7, 4o, 33. O0,o4,fT, lo.v-iDC 
01. A\ 24, 04, A7, 34. 03. 7F. 14, 02. 7F. 30. 02. 7F. 3C. Où. 0891 
57", 24. OB. 2F. OC. o2,3 7 . 00. o4, 2F, 3C.oo,01.AF. 24= Oh.o-fE 
T,i0.oF,A7,20.v5,A7,3o.05,7F.3e.ï3.C7,44,00,0D.0F20 
5F,0b,r,C6,22,54,57,o9,i5,6C.32.52.5D,o3.i5,6C.i3 7 2 
30,52,5D,05.i5.44,i4,52.5D,05.i5.^4,2 7 ,0C.5C.02.1&ô i 
àC, 3B, 2D, 0C, 5C, 02, 0C, 38,33,00, 01. A7, 00, 02. A7, 08. 1912 
o2,AT\24.02.AT,30,03, 7 F,iC,04, 7 F.34.04.S7,:i.o7. ,3'C 
5T.33,0G.2F,04,0ô,2F.22.03.2F.3F.00,i3.C7.o^,o5,iEEr 
57,0D.05,7F,16,05,A7,20.0F,A7.2C,05,A7.38.0A.7F.23oA 
44, 00,52, 50,05, 15,BC,0C, 10,59, 0A,15,BC,2D, 48, 5C,2oF4 
04,12.ô9,39.46,5C,04.12.6F.3D,BC,5D,04,17.46.14.2h9A 
o0,i2.C 7 ,04,i2, 3 F,o4,l2.7F,o4 < 12.5F,04.i2.3F.04, J :D5E 
i2,0F,04,03,lF,04,oo,,6,C 7 .00.i6,C7,4C,00,0o,05.2FE5 
FF,01, 00, 00, 0A, 00, 00,05, 02,00, 02,01, 01, 5F, 00,00, 3159 
00, 1E, OO, 01, 02, 02. 5F, 00. 00. 00. FA, 00, 81. 00.00, F4.344A 

01 ,0F, 04, 1E, 00, 81, 00, 00, 00, 00, 00, 00, 01, 00, 01, 03, 3502 

00. 64, 01. 03, 05, 00, OO. 01. 03. OO. 64. 01. 03. 03. OO. Oo. 353E 
01, 03, OO, 64, 01, 03, Oo, oo. oo. 32, 04. 00, OA. 00, i F, 00, 36F9 
oo, oo, 01. 00, 05, OO, 02. 0o.0F,C6, OO, 00. 00. 00, 00, CF. 38A7 
00,00, 00,00, OO. 00,01.0;. 00, 00, oo. 00. 00, OO, OO. CF,3-"3 
OO. 00, 01, 01, 03, 17, 03, 03. 03, 01, OO. OO. OO, OO, OO. CF. 3AdD 
FF. 03. 03. 03, 03, 17, 03, 03. o3,F3,AA, 00, OO, OO, OO. CF. 3Eo d 
00. 02. 02, 02, 03, 17, 03. 03, 03, A3, AA. OO. OO. OO. OO. CF , 4049 
00,05.00.00.03, 17, 17, 17. 57, 03. 00. 00, 00, OO, OO. OO, 40F0 
00, OF, 00. OO, 03, 3F, 3F. 3F. FF, 03. 00, 00. 00. OO. OO. OO. 42C1 
OO. OF, 55. 03. 03, 03, 03, 03. o3,o3. 00. oo, OO, 00, 00. OO. 433n 
00, OF, 00. 03. 3F. 03, o3, 03. 03, 03, AA, OO, 00,00.00.00.4444 
OO, OF, 00, 00, 00, o2. 02. 02, 02, OO, OO. 3C, OO, OO, OO. 00. 449" 
00,00,00.00,00.00,00,00,00.00,00,00,00.00,00,00.4497 
00,00,00,00,00,00,00.00.00.00,00,00,00,00,00.00,4497 
CF,CF,CF,CF,CF,00,00.00.00,00,00,FF.00.00,o0,o0,49Al 
00, 00. 00, 00, 03, 02, 05, OF, OF, OF, OF, OO, 01 , 03. 02. Oo, 49ED 
OO, 55. OO, OO, OO, 01 . 03, 02. OO. 00, 03, 03, OO, OO, 03, 03, 4A54 
o3, 03, o3. 03, 3F, 00, 00, 17, 17, 17, 17, 3F, 03. 03, 02. 01, 4843 
03, o3. 03, 17, 3F, 03, 03, 02, 01, 03, 03, 03, 17. 3F, 03, 03, 4C10 
02, 00, 03, 03, 03, 57. FF, 03, 03, 02, OO, ôl, F3, A3, 03, 03. 4Flo 
03, Ô3, OO, OO, OO, AA.AA, OO, OO. OO, AA, OO, 54, 50, 53, 20, 5231 
20, 20. 20. 20, 20, 20, 20, 20, 20, 20, 53, 43, 52, 20, 20, 20, 54B9 
20, 20, 20, 20, 20,52,42. 4F, 20.20, 20. 20.20.52.41. 44, 57B3 
00,D0,D2.CF,C7,D2,Cl,CD,CD,C5,DF,C5,C3,D2,C9,D4,d3B3 
DF,D0,C1,D2,DF,CF.CC,C9.D6,C9,C5,D2,DF,C5,D4.DF,70C5 
D2,C1,D0,C8,C1,C5,CC,DF,C7,D5.D4,C9,C5,D2,B2,C5,7D88 
DA,AE,DF,B3,B1,B8,B0,B0,DF,D3,C1.C9,CE.D4,DF,C 7 .B9EF 
Cl,D5,C4,C5,CE,D3,DF,A8,C6,D2,Cl,CE,C3,C5,A9,DF,9ôsD 
Ci,D6,D2.C9,CC,DF,Bl.B9,B8.B7,DF,AE.ô0.O0,O0.00.9FE0 




IFS [] [1 H 




10 ENT 1,10.-1,1. 1,0,10,10,1. IjENV 1.1,10.1.5,-2.1.1,0, >YB<. 

10.5,2.1. 1.-10.1.ENT 2,239.1, 1:ENV 2,127.-20. i. 12 7 . -20, 

l.ENV 3, 1,10,1, 10,-1, 10.-ENV 4.1, 15,1. 15.-1, 3.EMT 5.90.1 

&,2:ENV 6. 1,10.1. 10,-i. i : ENV 14, 15. -i. 15.3FEED INK 5.3; 

BORDER 4 

20 e*="n.ona. ":GOSUB 1440:a$="JûvstiLK";b*=' j Ciavier ': ,ACv 

RESTORE 1930:READ ad,d:WHILE ad<>-l:POKE ad.d.READ ad.d 

:WEND:DEFINT a,b,c,d,<j,w,e,r,t, <.z,x,p 

30 GOSUB 3310 

40 WINDOW #1.5.21.4, 14: PAPER *i.0:ù.5#l 

50 WINDOW #2. 4, 20. 3. 13: PAPER #2.3:CL5*2 



6« WINDOW #3, 26. 36, 4, 24: PAPER #3,0:CL3#3 
70 WINDOW #4, 25, 35. 3, 23: PAPER #4,3:CLS#4 
80 LQCATE #2,3,2:PRINT#2,"TCHERNMSLAND" 

90 LOCATE *2,3,2:PRINT#2,CHR$i22;CHRt{i;;" 

";CHR$(22)CHR$(0; 

100 LOCATE #2,6,4:PRINT#2,CHR$(164;:" 1987" 

110 LOCATE #2,6,6:PRINT#2,"Raphael" 

12» LOCATE #2,9,7:PRINTi2."V 

130 LOCATE #2, 6,8:FRINT#2. "Olivier" 

140 LOCATE #2,5,10:PRINT#2."6UTIERRE2" 

150 LOCATE #4, 1 , 3: PRINT#4, " i ) Ordre de 

sian 

160 LOCATE #4,1,8:PRINT#4."2) Ecran:" 

170 LOCATE #4,4,9:PRINT#4,e$ 

180 LOCATE #4, 1 , 13: PRINT#4, "3! "CHRï ',24; a$CHR* i24) 

190 LOCATE #4.4,14:PRINT#4. ,, ou 

200 LOCATE #4.4,15:PRINT#4,b$ 

210 LOCATE #4,l,18:PRINT#4."4i Jeu 

220 GOSUB 3180 

230 OUT i:BC00,6:OUT S<BD00,25 

240 GOSUB 2960 

250 t*="":WHILE t$<"l" OR T$;"4" 

260 t$=INKEY$:WEND 

270 ON V'AL(t$) GOTO 300,1420,1800,1980 

280 GOSUB 2960 



mis 



■FD. 
ZE 

:Œ 

>WG\ 
>ZH< 
>EJ\ 
>MK< 

/JE; 
>EC> 
>YD< 
>QE< 
>RF< 
>TS< 

>hh< 

>DJ< 
>2K< 
>EL\ 
>TC< 
>W< 
>AEx 
>HF< 
>HB< 
>JH< 
>KJ< 
>JK< 
>I"IL< 
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290 CALL &BB06 

300 HIND0Ht5,3,36,3,24:PAPER #5,0:CLS#5 

310 HIND0H#6,2,35,2,23:PAPER #6,3:CLS#6 

320 HINDOU SUAP 0,6 

330 PEN l:LOCATE 10,2:PRINT"Ordre de aission":PRINT 

340 PRINT" Le reacteur no 4 de la centrale" :PRINT 

350 PRINT" atomique de TCHERNMSLAND est": PRINT 

360 PRINT" entre en fusion et «tenace de":PRINT 

370 PRINT" faire exploser toute la centrale.": PRINT 

380 PRINT" Vous devez évacuer de l'atelier":PRINT 

390 PRINT" contigu 25 caisses contenant des":PRINT 

400 PRINT" documents et des matériels tres":PRINT 

410 PRINT" précieux avant rexplosion":PRINT 

420 PRINT" finale." 

430 GOSUB 2960 

440 CALL &BB06 

450 HIND0H#5,5,26,5,22:CLS#5 

460 HINDOU 4, 25, 4, 21: PAPER 1:PEN 3:CLS 

470 LOCATE 1,2 

480 PRINT" Pour ce faire vous" 

490 PRINT 

500 PRINT" pourrez utiliser 3": PRINT 

510 PRINT" robots télécommandes." 

520 PRINT" Ces robots , bourres u :PRINT 

530 PRINT" d'electronique,sont":PRINT 

540 PRINT" très fragiles :":PRINT 

550 PRINT" Veillez a ne pas les": PRINT 

560 PRINT" les laisser tomber": PRINT 

570 PRINT" de trop haut ! " 

580 GOSUB 2960 

590 CALL J.BB06 

600 PEN 1: HINDOU 2, 35, 4, 23: PAPER 3:CLS 

610 LOCATE 1,4 

620 PRINT" Sachez que toutes les salles de" .-PRINT 

640 PRINT" l'atelier sont occupées par des":PRINT 

660 PRINT" robots d'entretien qui ont":PRINT 

680 PRINT" reçu une dose importante de": PRINT 

700 PRINT" radiations , les détournant de":PRINT 

720 PRINT" leur fonction première de":PRINT 

740 PRINT" nettoyage et les faisant se":PRINT 

760 PRINT" retourner contre tout visiteur." 

770 GOSUB 2960 

780 CALL &BB06 

790 PEN 3:PAPER 1:HIND0H#5.5,32,5,13:CLS#5:WIND0U 4,31, 

4,12: CLS 

810 LOCATE 1,2:PRINT" Evitez tout contact avec":PRINT 

830 PRINT" eux car une irradiation":PRINT 

850 PRINT" supérieure a 100 radons": PRINT 

870 PRINT" détruirait votre robot." 

880 GOSUB 2960 

890 CALL IBB06 

900 PEN 3: PAPER 1:HIND0H#5,5,32,15,22:CLS#5 

920 HINDOU 4,31, 14, 21: CLS 

930 LOCATE 1,1 

940 PRINT" Vous pourrez heureusement": PRINT 

960 PRINT" utiliser une chambre de":PRINT 

980 PRINT" stérilisation qui abaissera" 



>YM< 


990 PRINT" votre taux de radioactivité" 


>tv<: 


>TD< 


1000 GOSUB 2960 


>EB< 


>HE< 


1010 CALL &BB06 


>0C< 


>BF< 


1020 PEN hWINDOH 2,35,4,23 


>QD( 


>FG< 


1030 PAPER 3: CLS 


>LE< 


>YH< 


1040 LOCATE 1,2 


>YF< 


>UJ< 


1050 PRINT " Un hélicoptère vous transportera" 


>0G< 


>CK< 


1060 PRINT 


>YH< 


>UL< 


1Ô70 PRINT" directement dans le coeur du" 


>YJ< 


>BM< 


1080 PRINT 


>AK< 


>PN< 


1090 PRINT" reacteur et vous y attendra" 


>CL< 


>ZE< 


1100 PRINT 


>TC< 


>FF< 


1110 PRINT" jusqu'à la fin du compte a" 


>ad<: 


>MG< 


1120 PRINT 


>VE< 


>JH< 


1130 PRINT" rebours précédant l'explosion." 


>ZF< 


>VJ< 


1140 PRINT 


>XG< 


>HK< 


1150 PRINT" Evacuez les caisses par le" 


>VH< 


>FL< 


1160 PRINT 


>ZJ< 


>CM( 


1170 PRINT" tapis - roulant et regagnez" 


>BK< 


>EN< 


1180 PRINT 


>BL< 


>CP< 


1190 PRINT" l'hélicoptère une fois votre" 


>Lh< 


>NF< 


1200 PRINT 


>UD< 


>CG< 


1210 PRINT" tache accomplie." 


>RE< 


>HH< 


1220 GOSUB 2960 


>JF< 


>YJ< 


1230 CALL &BB06 


>VG< 


>QK< 


1240 PEN 3: PAPER 1 


>UH< 


>EL< 


1250 WIND0U#5,5,32,5,15:CLS#5 


>HJ< 


>qn< 


1260 HINDOU 4,31,4, 14: CLS 


>QK< 


>HN< 


1270 LOCATE 1,2 


>DL< 


>QP< 


1280 PRINT" Le robot se déplace avec" 


>XM< 


>BQ< 


1290 PRINT 


>DN< 


>CG< 


1300 PRINT" les touches du curseur ou" 


>YE< 


>AH( 


1310 PRINT 


>HF< 


>VJ< 


1320 PRINT" avec le joystick." 


>UG< 


>VL< 


1330 PRINT 


>YH< 


>TN< 


1340 PRINT" Pour pousser une caisse, " 


>QJ< 


>QQ< 


1350 PRINT 


>AK< 


>NH< 


1360 PRINT" appuyez sur FEU ou SHIFT." 


>QL< 


>UK< 


1370 GOSUB 2960 


>QM< 


>JM< 


1380 CALL &BB06 


>BN< 


>YP< 


1390 WINDOH SWAP 0,6: CLS 


>wp<: 


>RQ< 


1400 GOSUB 3330 


>AF< 


>CR< 


1410 GOTO 40 


>PG< 


>KT< 


1420 GOSUB 1440 


>CH< 




1430 GOTO 150 


>HJv 


>TK< 


1440 IF e$="couleur" THEN e*="mono. ": BORDER 1 
1660 ELSE e*="couleur": BORDER 4: RESTORE 1520 


: RESTORE >YK< 


>KM< 


1450 READ a 


>ZL< 


>NP< 


1460 UHILE aO-1 


>LM< 


>UR< 


1470 READ b,c 


>YN< 


>UT< 


1480 INK a,b,c 


>EP< 


>EU< 


1490 READ a 


>DQ< 


>YK< 


1500 WEND 


>UG< 


>RM< 


1510 RETURN 


>NH< 


>CN< 


1520 DATA 1,26,26 


>ZJ< 


>BP< 


1530 DATA 2,2,2 


>JK< 


>VR< 


1540 DATA 3,11,11 


>QL< 


>MK 


1550 DATA 0,0,0 


>EM< 
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1560 DATA 5,7,7 

1570 DATA 6,11,11 

1580 DATA 7,23,23 

1590 DATA 8,10,10 

1600 DATA 9,15,15 

1610 DATA 10, 18, 18 

1620 DATA 11,15,15 

1630 DATA 12,20,11 

1640 DATA 13,11,20 

1650 DATA 14,9,9,-1 

1660 DATA 1,25,25 

1670 DATA 2,8,8 

1680 DATA 3,15,15 

1690 DATA 0,0,0 

1700 DATA 5,7,7 

1710 DATA 6,26,26 

1720 DATA 7, 19, 19 

1730 DATA 8,14,14 

1740 DATA 9,7,7 

1750 DATA 10,9,9 

1760 DATA 11,16,16 

1770 DATA 12,7,26 

1780 DATA 13,26,7 

1790 DATA 14,10,10,-1 

1800 IF a$="Joystick" THEN a$="Clavier ":b$=". joystick": 

RESTORE 1880 ELSE a*="Joystick":b$="Clavier ":REST0RE 1 

930 

1810 READ ad,d 

1820 WHILE ad<>-l 

1830 POKE ad.d 

1840 READ ad,d 

1850 WEND 

1860 60SUB 2960 

1870 GOTO 150 

1880 DATA 15403,21,16342,0 

1890 DATA 16519,2,16838,8 

1900 DATA 16846,1,16857,21 

1910 DATA 17069,1,17077,8 

1920 DATA 17088,21,-1 

1930 DATA 15403,76,16342,72 

1940 DATA 16519,73,16838,74 

1950 DATA 16846,75,16857,76 

i960 DATA 17069,75,17077,74 

1970 DATA 17088,76,-1 

1980 GOSUB 3260 

1990 MODE 0: PAPER 6 

2000 CLS:ORIGIN 0,0,0,640,0,52 

2010 CLG 10: PAPER 

2020 CALL 8(3000 

2030 GOSUB 3180 

2040 SOUND 1,500,-116,0,6,0,31 

2050 i=2000 

2060 GOSUB 2990 

2070 CALL 14934 

2080 ON PEEK( 15043) +1 GOTO 2090,2200.2180 

2090 i=2000 

2100 GOSUB 2990 

2110 MODE 1 



>BN< 
>XP< 

>FQ< 
>ZR< 
>CH< 

>DJ< 
>ZK< 
>TL< 
>VM< 
>HN< 
>CP< 
>CQ< 
>ER< 
>KT< 
>XJ< 
>FK< 

>m< 

>DM< 
>FN< 
>EP< 
>GQ< 
>HR< 
>KT< 
>AU< 
>HK< 



>VL< 
>KM< 
>TN< 

>yp< 
>cq< 

>VR< 

>ET< 

w< 

>TV< 
>JL< 
>FIK 

>WN< 
>JP< 
>EQ< 
>PR< 
>FT< 

>m. 

>RV< 

>FW< 
>TC< 
>ZD< 
>AE< 
>DF<. 
>F6< 
>YH< 
>QJ< 
>LK< 
>«L< 
>CM< 
>KD< 
>KE< 



2120 GOSUB 2630 

2130 LOCATE 7,9:PEN 1 

2140 PRINT"Vous avez trop tarde a" 

2150 LOCATE 5,11 

2160 PRINT"ramener toutes les caisses." 

2170 GOTO 2810 

2180 GOSUB 2630 

2190 GOTO 2770 

2200 i=2500 

2210 GOSUB 2990 

2220 FOR 1=1 TO 3 

2230 CALL &BD20 

2240 FOR a=l TO 350:NEXT 

2250 NEXT 

2260 GOSUB 3420 

2270 GOSUB 3310 

2280 WINDOW #5,5,37,3,24 

2290 PAPER #5,0:CLS#5 

2300 WIND0W#6,4,36,2,23 

2310 PAPER #6,3:CLS#6 

2320 WINDOW SWAP 0,6 

2330 PEN 1: LOCATE 4,5 

2340 PRINT"BRAVO , VOUS AVEZ REUSSI A" 

2350 LOCATE 4,7 

2360 PRINT"RAMENER TOUTES LES CAISSES" 

2370 LOCATE 2,9 

2380 PRINT"AVANT QUE LA CENTRALE N'EXPLOSE" 

2390 LOCATE 2, 12: PEN 2 

2400 PRINT"Votre score est de"; 

2410 hg$=HEX$(PEEK( 15037) )+HEX$(PEEK( 15036) ,2)+HEX*(PEE 

K< 15035), 2) 

2420 s$=HEX*(PEEK( 15034) )+HEX$(PEEK< 15033) ,2) 

2430 PRINT VAL(hg$)+VAL(s$)+(PEEK(15039) XOR 3)*1000; 

2440 PRINT"points. " 

2450 GOSUB 3020 

2460 1=4500 

2470 GOSUB 2990 

2480 GOSUB 3260 

2490 MODE 0: PAPER 6 

250O CLS:ORIGIN 0.0,0,640,0,52 

2510 CLG 10: PAPER 

2520 CALL 43000 

2530 GOSUB 3180 

2540 SOUND 1,500.-90,0,6,0,31 

2550 CALL 12407 

2560 i=4000 

2570 GOSUB 2990 

2580 GOSUB 3620 

2590 GOTO 30 

2600 i=2000 

2610 GOSUB 2990 

2620 GOSUB 2960 

2630 GOSUB 3310 

2640 WIND0W#5,5,37,3,24 

2650 PAPER #5,0:CLS#5 

2660 WIND0W#6,4,36,2,23 

2670 PAPER #6,3:CLS#6 

2680 WINDOW SWAP 0,6 



>CF< 
>BG< 
>VH< 
>HJ< 
>JK< 
>FL< 
>JM< 
>NN< 
>AE< 
>MF< 
>YG< 
>UH< 
>LJ< 
>QK< 
>FL< 
>EM< 
>LN< 
>GP< 
>AF< 
>EG< 
>FH< 
>W< 
>UK< 
>ML\ 
>LM< 
>PN< 
>HP< 
>BQ< 
>NG< 
>EH< 

>BJ< 
>HK< 
>UL< 
>CM< 
>UK 
>WP< 
>HQ< 
>BR< 
>¥H< 
>EJ< 
>FK< 
>JL< 
>KH< 

:>gn< 

>GP< 
>XQ< 
>NR< 
>ZT< 
>ZJ< 
>RK< 
>PL;. 
>EM< 
>LN< 
>GP< 
>KQ< 
)PR< 
>OT< 
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2690 st=HEX*(PEEK (15Ô34) )+HEX$(PEEK(15033) ,2) 

2790 LOCATE 6,2:PEN 2 

2710 PRINT"Vous avez 3CCompli";VAL(s*)/3750*100;'7." 

2720 LOCATE 10,4 

2730 PRINT"de la mission." 

2740 LOCATE 3,6 

2750 PRINT"Votre score est de "s*; " points. " 

2760 RETURN 

2770 LOCATE 1,9:PEN 1 

2780 PRINT" Vous avez détruit les 3 robots" 

2790 LOCATE 6,11 

28O0 PRINT"mis a votre disposition" 

2810 LOCATE 2,13 

2820 PRINT" Il est trop tard pour récupérer" 

2830 LOCATE 6, 15 

2840 PRINT"les documents précieux." 

2850 LOCATE 5,17 

2860 PRINT"VOUS AVEZ ECHOUE DANS VOTRE" 

2870 LOCATE 5, 19 

2880 PRINT" MISSION !!" 

2890 LOCATE 6,21 

2900 PRINTTA CENTRALE VA EXPLOSER ! ! !" 

2910 GOSUB 2960 

2920 1=7500 

2930 GOSUB 2990 

2940 GOSUB 3550 

2950 GOTO 30 

2960 WHILE INKEYiO"" 

2970 WEND 

2980 RETURN 

2990 FOR 1=1 TO STEP -1 

3Ô00 NEXT 

3010 RETURN 

3020 RESTORE 3170 

3030 SOUND 135,0,1,0 

3040 READ a 

3050 WHILE aO-1 

3060 SOUND 1, a, 14,5 

3070 SOUND 2,a-2,14,5 

3080 SOUND 4,a-5,14,5 

3090 READ a 

31»0 WEND 

3110 WHILE SQ(1)<>4 

3120 WEND 

3130 SOUND 1,125,160,5 

3140 SOUND 2,123,160.5 

3150 SOUND 4.120,160,5 

3160 RETURN 

3170 DATA 142,150,159,150,159,169,-1 

3180 IF e$="couleur" THEN RESTORE 1520: BORDER 4 ELSE RE 

STORE 1660: BORDER 1 

3190 READ a 

3200 WHILE aO-1 

3210 READ b.c 

3220 INK a. b.c 

3230 READ a 

3140 WEND 

3250 RETURN 



>LU< 


3260 BORDER 


>HM< 


>XK< 


3270 FOR i=0 TO 15 


>JN< 


>VL< 


3280 I*: i,0 


>YP< 


>JM< 


3290 NEXT 


>WQ< 


>YN< 


3300 RETURN 


>MG< 


>NP< 


3310 MODE 1:PEN 


>AH< 


>UQ< 


3320 PAPER 1:CLS 


>NJ< 


>XR< 


3330 FOR i=32 TO 640 STEP 32 


>YK< 


>FT< 


3340 PLOT i,0,0 


>WL< 


>RU< 


3350 DRAWR 0,400 


>ZM< 


>W< 


3360 NEXT 


>UN< 


>LL< 


3370 FOR i=390 TO 6 STEP -32 


>CP< 


>KM< 


3380 PLOT 0,i,0 


>AQ< 


>YN< 


3390 DRAWR 640,0 


>KR< 


>UP< 


3400 NEXT 


>NH< 


>UQ< 


3410 RETURN 


>PJ< 


>XR< 


3420 IF e*="couleur" THEN RESTORE 1660 ELSE RESTORE 


152 >CK< 


>PT< 







>BU< 


3430 READ Q,W,E,R,T,Y,Z,X,C 


>ML<. 


>zv< 


3440 FOR 1=26 TO STEP -1 


>FM< 


>xw< 


3450 FOR P=0 TO 100: NEXT 


>YN< 


>YM< 


3460 IF WO0 THEN INK 1,W:W=W-1 


>ZP< 


>RN< 


3470 IF TO0 THEN INK 2,T:T=T-1 


>NQ< 


>QP< 


3480 IF XO0 THEN INK 3,X:X=X-1 


>HR< 


>XQ< 


3490 NEXT 


>YT< 


>0R< 


3500 CLS 


>NJ< 


/ZT< 


3510 INK 1,E 


;QK< 


>AU< 


3520 INK 2, Y 


>PL< 


>GV< 


3530 INK 3,C 


;TM< 


>BW<. 


3540 RETURN 


>UN< 


>GX< 


3550 GOSUB 3260 


;LP<, 


>JD< 


3560 MODE 0: PAPER 6 


>AQ< 


>KE< 


3570 CL5:0RI6IN 0,0,0,640,0,52 


>GR< 


>FF< 


3580 CLG 10: PAPER 


>NT< 


?KG< 


3590 CALL &3000 


>PU< 


>WH< 


3600 OUT S<BC00,6:OUT ?,.BD00,24 


>TK< 


>HJ< 


3610 GOSUB 3180 


>JL< 


>FK< 


3620 FOR x=l TO 10 


>VM< 


>LL< 


3630 FOR i=0 TO 15 


>JN< 


>TM< 


3640 GOSUB 3750 


>QP< 


>BN< 


3650 NEXT 


>WQ< 


>RE< 


3660 NEXT 


>XR< 


>HF< 


3670 GOSUB 3180 


>QT< 


>UG< 


3680 FOR i=25 TO STEP -1 


>LIK 


>CH< 


3690 OUT &BC00,6:OUT JflDW,i 


>WV< 


>CJ< 


3700 FOR c=0 TO 50: NEXT 


>JL< 


>CK< 


3710 NEXT 


>TM< 


>rl<: 


3720 GOSUB 3260 


>KN< 


/BM< 


3730 SOUND 7,3*30+30,200,15,14,0,31 


>OP< 


>LN< 


3740 RETURN 


>«Q< 




3750 RANDOMIZE TIME 


>VR< 


>CP< 


3760 a=RND*27 


m< 


>EF< 


3770 INK 1,3: INK 3 MQD 16, 1 


>HU< 


>RB< 


3780 OUT &BC00,13:OUT &.BB00,1 


>W< 


>YH< 


3790 SOUND 135,3*30+30,200,15,15,0,31 


>EW<. 


>XJ< 


3800 OUT &BC00,13:OUT ?*.BD00,0 


>U1< 


>XK< 


3810 RETURN 


>un<: 


>RL< 


3820 GOTO 3630 


>KP(A 
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MIRAGE IMAGER version TURBO 

enfin le TRANSFERT et la SAUVEGARDE ULTRA-RAPIDES ! 



RECHARGEZ UN PROGRAMME DE 64 Ko EN 14 SECONDES ! 

APRES L'AVOIR TRANSFERE EN UNE VINGTAINE DE SECONDES 

avec la version TURBO du MIRAGE IMAGER 

LE PERIPHERIQUE QUI TRANSFERE et SAUVEGARDE 
100 % DES PROGRAMMES 

LE MIRAGE IMAGER TURBO 



CPC 464/664 : 
seulement450 FF 

Port compris 




CPC 6128: 

seulement 500 FF 

Port et câble 6128 compris 

Spécifier si Schneider ou 6128 AZERTY "Nouvelle broche" S. V.P. 



MANUEL COMPLET de 3000 mots entièrement en Français 

Le MIRAGE IMAGER version TURBO est disponible maintenant. 
Chez nous, la RUPTURE DE STOCK N'EXISTE PAS. 



Ses caractéristiques : 

SAUVEGARDE 64 Ko SUR DISQUETTE EN UNE VINGTAINE DE SECONDES 

RECHARGE UN PROGRAMME DE 64 Ko EN 14 SECONDES ' 

TRANSFERT K7 t DISQUETTE ou DISQUETTE CASSETTE et SAUVEGARDE K7 K7 ou 

DISQUETTE DISQUETTE de tout programme protège ou non jusqu'à 128 Ko (64 Ko sur 464/664) 

SAUVEGARDE K7 EN 3 VITESSES (normale, rapide et TURBO) 

TOOLKIT incorpore qui affiche les adresses, INK, PEN et autres détails des programmes 

et écrans, permettant un bidouillage acharne et intensif. 

Grèce au TOOLKIT, contemplez instantanément les résultats des bidouillages effectues ' 

MODE 64Kou 128 K avec les CPC 6128 

Se branche en 2 secondes ' 

Extrêmement simple a utiliser gère par menus et l'on presse UN SEUL BOUTON pour 



transférer sauvegarder /recharger 

Ne prend aucune place en RAM, n'est donc pas détectable par l'ordinateur 

Très amical, détecte les erreurs de l'operateur 

8 K RAM et 8 K ROM incorpores 

Compresse afin d'utiliser un espace minimum sur disque ou cassette 

Sauvegarde en un seul bloc (pratique pour archivage) 

Compatible avec les ROMS et cartes d'extension et permet aussi de les invalider 

Pour usage personnel 

Comporte un bus d'extension pour raccorder d'autres périphériques 

Stoppez un jeu a n'importe quel moment, sauvegardez et reprenez-le au même endroit 

TOUS les programmes transfères fonctionnent ' 



VENTI \ XCLUSIVEMENT PAR CORRESPONDANCE - Envoyez vite votre commande (en Français) à : DUCHET COMPUTERS 

51, Saint-George Road - CHEPSTOW NP6 5LA - ANGLETERRE. Téléphone : +44.291.257.80 

ENVOI IMMEDIAT LE JOUR MEME PAR AVION dans le Monde entier 

REGLEMENT PAR : 
MANDAT POSTE INTERNATIONAL en francs - EUROCHEQUE en livres sterling (vous faites la conversion) 
ou CHEQUE BANCAIRE en livres sterling compensable en Angleterre (votre banque fait la conversion) 

^\\ ou carte de crédit internationale VISA, EUROCARD, MASTERCARD, ACCESS 

Rédiger les mandats, etc.. à l'ordre de DUCHET Computers. 

Si vous êtes pressé, reservez votre commande EN PARLANT EN FRANÇAIS ! 

Téléphonez à Caroline, |ean-Pierre ou Didier au 44.291.257.80 de 8 h à 19 h 





DUCHET COMPUTERS & SIREN SOFTWARE 

51 Saint-George Road - CHEPSTOW - NP6 5 LA - ANGLETERRE. Tel. +44.291.257.80 

EN EXCLUSIVITE : DU MATERIEL ET DES PROGICIELS SUPER CHOUETTES EN FRÀNÇÀiS 
POUR AMSTRAD - SCHNEIDER 464/664/6128 

FAITES EXPLOSER EN STEREO LES EFFETS SONORES ET MUSICAUX 
DE VOS LOGICIELS AMSTRAD AVEC L'AMPLI STEREO 

SOUNDBLASTER 

(195.00 FF Port compris) 

SOUNDBLASTER, miracle de la technologie miniature moderne, se raccorde directement au moniteur età l'ordi- 
nateur. Tous les câbles et prises sont fournis Relie/ vos enceintes Hi-Fi ou autoradio (jusqu'à 40 watts par canal) 
directement au sot NDBIASTER sans avoir a passer par votre chaîne Hi-Fi ! ( hargez vos logiciels d'arcade favoris 
et faites trembler les murs ! Terrorisez votre entourage avec des effets sonores terribles ' L'ampli stéréo SOUND- 
BLASTER (10 cm \ 6 cm \ 2 cm) pesé ion grammes. Il est livré prêt a fonctionner avec : câble et prise de raccord 
au moniteur, câble et prise de rai tord à l'ordinateur, cinq mètres de câble pour enceintes, prise pour casque 
cl'ec oute, deux boutons de réglage volume et balanc e. et instruc tions c omplètes en français. 

SOUNDBLASTER ne vaut que 195.00 FF port compris. 
(Pour expédition hors I urope ajouter 20 1 1 S.V.P ) 

CADEAU GRATUIT ! A tout ac heteur du SOI NDBLASTER nous offrons en c , ici eau un magnifique c asque d'écoute 
stéréo ultra-léger 

Vote . les ent eintes Hi-Fi ne sont pas fournies ,i\e< SOI \DBLASTER. 

ENFIN ! UN PROGRAMMATEUR D'EPROM ULTRA RAPIDE 

POUR AMSTRAD CPC ! 

Se relie à l'ordinateur en un instant. ( omporte un support a tore e d'insertion nulle pour travail soigne et rapide. 
Faites une copie de sauvegarde de vos ROMS commerciales, rransfercv vos programmes personnels Basic ou ma- 
chine' c ode, routines, RS\, sur I PR( )M Copie de ROM < iriginale en RAM ou sur disquette Programme les I PROMS 8k 
ou 16K a partir de RAM disquette ou K7 Pr< igrammatii >n ultra-rapide une I PR( >\\ de i<>k est programmée en moins 
de 2 minutes et demi. L'interface PROGRAMMAT! I R D'I PRO.M esl livrée avec son logiciel utilitaire disquette V 
ou k7 (spec ifiez S.V.P.) transférable sur l PR( )M. Instructions c omplètes en français. 

L'interface PROGRAMMATEUR D'FPROM ne vaut que 550.00 FF (port compris) 
(Pour expédition hors I urope ajouter J r > Il SA P.) 

LOGICIELS UTILITAIRES EN FRANÇAISE 

I UKdLJLwv^Kj la disquette utilitaire 1 en Français pour transférer de k7 a disquette les programmes récents 
et nouveaux protégés par le NOI MAI "Speedlock". iransfert automatique et intégral en une opération. Extraordi- 
nairement facile à utiliser. 

TURBOLOCKS sur disquette 3" (464/664/61 28) 1 50.00 FF port compris. 

(Pour expédition hors F urope ajouter 10 11 S.V.P.), 

L>AbjbLvJL-Kb la cassette» utilitaire en traînais pour la sauvegarde K7/K7 des programmes récents et 
nouveaux protégés par le NOUVEAI "Speedlock". Enfantin à utiliser. CASSELOCKS sur k7 uniquement ne vaut 

que : 100.00 FF port compris. 
(Pour expédition hors Europe ajouter 10 FI S.V.P.). 

ADAPTATEUR périphériques AMSTRAD CPC vers SCHNEIDER et A/rRTY "nouvelles broches". Vous êtes 
l'heureux possesseur d'un nouvel AMSTRAD AZf RTY ou d'un SCHNi IDFR. Felic itations ! ( ependant, il ne vous est pas 
possible de lui raccorder les périphériques des AMSTRAD QWERTY c ar les broches sont différentes. Quel dommage ! 
procurez-vous notre cordon adaptateur et le tour est joué ! Vous pourrez maintenant connecter tous les péri- 
phériques/interfaces conçus pour "l'ancienne" broche AMSTRAD. 

Cordon ADAPTATELJR "nouvelle/ancienne" broche 1 20.00 FF port compris. 

(Pour expédition hors Europe ajouter 10 FI S.V.P.). 

VENTE EXCLUSIVEMENT PAR ( ORRI SPONDANCF - Envoyez vite votre commande (en Français) a : DUCHET COMPUTERS 

51, Saint-George Road - ( HIPSTOW NP6 5LA - ANGLETERRE. Téléphone : +44.291.257.80 

ENVOI IMMEDIAT LE JOUR MEME PAR AVION dans le Monde entier 

REGLEMENT PAR : 

MANDAT POSTE INTERNATIONAL en francs - EUROCHEQUE en livres sterling (vous faites la conversion) 
ou CHEQUF BANC AIRI cm livres sterling compensable en Angleterre (votre banque fait la conversion) 

■®\ ou c arte de < redit internationale VISA, El IROCARD, MASTERCARD, ACCESS 

Rédiger les mandats, etc.. à l'ordre de QUCHFT Computers. 

Si vous êtes pressé, réservez votre commande FN PARLANT FN FRANÇAIS ! 

Téléphonez à C ar oline, |ean-Pierre ou Did ier au 44.291.257.80 de 8 h à 19 h 





Les programmes en français sont Copyright DLICHETCOMPLTFR.S & SIRFN SOFTWARE. Leur diffusion commerciale même partielle sous quelque titre 

ou forme que ce soit et par qui que ce soit est formellement interdite. 
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PHŒNIX 



Stéphane LOUET 




Il est particulièrement rageant de perdre des heures de dur labeur 
à cause d'une erreur d'inattention : vous venez de taper I era, 
"*.*" à la place de I era,"*.BAK". Ce programme répare en 
un clin d'œil les disquettes effacées par inadvertance. Il fonc- 
tionne sur tous les CPC et accepte les formats SYSTEM, VEN- 
DOR, DATA & IBM. Un directory saturé, c'est-à-dire contenant 
64 fichiers est régénéré en moins de trois secondes ! temps 
d'exécution sur catalogue "normal" : une seconde). Une petite 
étoile permet de suivre le déroulement du programme : lecture 
du directory (phase la plus longue), réparation et sauvegarde 
du nouveau directory. PHOENIX constitue donc un garde-fou 
pour les programmeurs distraits. 



Le nom d'un programme est stocké dans le catalogue avec les 
adresses des secteurs que doit charger le CPC pour l'exécuter. 
Ces adresses sont codées logiquement en blocs pour occuper 
moins de place. L'octet précédant chaque nom de fichier vaut 
&E5 s'il est effacé. PHOENIX charge donc les 4 secteurs du 
directory à l'aide de l'instruction &84 de la Rom-disque, rem- 
place les octets statuts d'effacement &E5 par puis sauve enfin 
le nouveau directory (instruction &85). 

N.B : POKE &A027, 1 permet de travailler sur le drive B. Atten- 
tion, les routines d'erreur disque ne sont alors plus gérées à la 
lecture. 



Eléments techniques 

Le directory est situé sur des pistes différentes selon le format. 



FORMAT 


PISTE 


SECTEURS 


SYSTEM 

VENDOR 

DATA 

IBM 


2 
2 

1 


41 -> 44 
41 -> 44 
C1 -> C4 
01 -> 04 



Listing nitniblrur 



:LD HL, LABEL» 
LD DE, «6000 



I Adrm* 

i Adreiir 

I Lnnqueu 



nom de <ichi»r 



CALL CAS OUT OPEN 
CP « 90 

JR Z .LABEL! 



CP 



C4 



no». 

I Ouverture (icriier pour dêterr 
I Disquette absente ' 

( Directory inexistant ~> 



1 ner format . 



Ferme 
Retour 



LABEL3 
LAFEL4 
LABELS 
LABELd 
LABELI 
LABEL7 



LABEL? 
LABELS 



JR Z .LABEL2 

CALL DISK OUT CLOSE 

RET 
:DEFM "A" 

LD HL.LABEL3 

CALL KL-FIND-CDMMAND 

RET NC 

LD (LABEL4) , HL 

LD A , C 

LD <LABEL4*2> . HL 

LD E , 

LD D ,0 

LD C .MCI 

LD HL.M9000 

RST me 

DEFU LABEL* 

RET 
:DEFB «84 
:DEFS 3 

:DEF« "Disauette absente." 
:DEFH 'Directory inexistant. 
:LD HL.LA8EL3-1 I Poin 
: INC HL 

LD A, (HL) 

CALL TXT OUTPUT 

CP H2E 

JR NZ.LABEL7 

CALL KM, INITIALISE 

CALL KM UAIT CHAR 

JP DEBUT 
:LD HL.LABEL6-1 
: INC HL 

LD A, (HL) 

CALL TXT OUPUT 

CP »2£ 

JR NZ. LABELS 

CALL KM INITIALISE 

CALL KM UAIT CHAR 

RET 

NOP 



ichier . 
Basic . 



1 Charge commande It84 lecture, kBS 

1 Retour si rien trouvé. 

I Sauver adresse routine. 

I Sauver Rom. 

I Lecteur (0 pour A, 1 pour B) . 

! Piste di rectory . 

I Secteur. 

I Adresse buifer. 

I Apoel le rout ine. 

I Retour Basic. 



Affiche caractère. 



| Vi de bufler clavi 
1 Attend frappe d'u 



I 



Retour Basic . 



18 IF HIMEM036863 THEN SYMBOL AFTER 120: MEMORY &6FFF:S 
YMBOL 123, &6d, &10, t(78, bC, &7C, &CC, &76: SYMBOL 125.6,8.Î3C 

,ît66,«<7E, 8:60 , i3C : INK 0, 1 1 : BORDER 11:1 NK 1 , 0: FOR i =4A000 

TO iA08B:REAB a$:P0KE i,VAL("&"+a$):NEXT:PEN 1 ELSE PO 
KE 4A033,8e84 

20 a*=CHR*( 149): PAPER 0:MODE 2:PRINT"PH0EN1X V0.1 - "CH 
R$U64)" SOphane LOUET 19B7 . R}paration automatique d 
e directory. " 

30 POKE &BE78, 255: POKE &BE66,2:PRINT:PRINT:PRINT"Ins}re 
z la disquette { r)g>n>rer puis presse: une touche: _"CH 
R*< 143);: CALL &BW0:CALL 8B606: PRINT CHR$(8)" " 
40 W1ND0W 30,50,8, 16: PRINT CHR*(150!STRING$U9, 154)CHR* 

(156>a$STRIN6$(19.32)a*a»" LeCture "a*a$" R 

îparation.. "ata$" Ecriture "a*a*STRING*il9 

, 32 ) a$CHR* ( 147 f STRINGt (19, 154 ) CHR$ ( 153) : LOCATE 17,3:PRI 

NT"*" 

50 WINDOW 1.30,6,6:CALL &A000-.NINDOH 1,80, 1,25: LOCATE 1 

.6:PRINT STRING$(21,32) 

60 a=PEEK(&BE74):IF a=&C4 THEN POKE tA029,9 ELSE IF a=* 

44 THEN POKE tA029,2 ELSE IF a=4 THEN POKE W»29,l ELSE 

20 

70 GOSUB 90:POKE &BE7B.0: LOCATE 46. 10: PRINT" ":L0CATE 4 
6,11:PRINT"*";:F0R i*&90ei TO 8.9800 STEP 32: IF PEEK(i) = 
&E5 THEN 80 ELSE POKE i-l,Ô:NEXT 

80 PRINT CHR*(8)* "CHR$(10)CHR$(8)"*":WINDOW 1,32,17.20 
:P0KE 8A033.V.85: GOSUB 90:CLS:WINDOW 1,80. 1,25: LOCATE 1, 
17:PRINT"R)g)n}ration achev>e...":END 
90 FOR 1=1 TO 4:P0KE &A02B,a+i-4:POKE 8A02E,2*i+88E:CAL 
L tA018:NEXT:RETURN 

100 DATA 21, 17, A0,11, 0,60,6,1, CD,8C,BC,FE,90,2B,51,FE,C 
4.28,62,CD,8F,BC,C9,41,21,33,A0,CD,D4,BC,D0,22,34,A0,79 
, 32,36,A0,1E,0, 16, 1,E, Cl, 21, 0,90,DF, 34^0,09,84,0,0,0,7 
,44, 69, 73,71, 75, 65, 74, 74, 65, 20,61, 62,73, 65, 6E, 74, 65, 2E, 
7, 44, 69, 72, 65, 63, 74, 6F, 72. 79, 20, 69 
110 DATA 6E,65,78,69,73,74,61,6E,74,2E,21,36.A0,23,7E.C 
D.5A,BB,FE,2E,20,F7,CD,0,BB,CD,6.BB,C3,0,A0,21,49,A0,23 
,7E,CD,5A,BB,FE,2E,28,3,C3,78,A0,CD,0,BB,CD,6,BB,C9,0« 



Efi 



■■•i 



M 



IV 



PO 



86 



B 



N 



D' 



L'IMPRIMANTE 
CITIZEN 120 D 

VERSION AMSTRAD 



Bernard PO/SOT 



Les imprimantes sont des 
périphériques qui ont largement 
profité des divers progrès 
technologiques. 
La C 1 20 D est l'une de ces 
imprimantes modernes. Deux détails 
non négligeables : son prix, de l'ordre 
de 2000 F, soit un peu plus que la 
célèbre imprimante AMSTRAD DMP 
2000 et sa possibilité de s'adapter à 
de nombreux ordinateurs courants 
par simple échange de la carte 
d'interface, ce qui peut intéresser les 
clubs, par exemple. 



Caractéristiques : 

Matrice d'impression à 9 
points, dont seulement 7 
sont habituellement utilisés 
sur les CPC, le port de l'im- 



primante ne transmettant 
que 7 bits. Une possibilité 
nous est offerte de comman- 
der par logiciel la valeur du 
huitième bit. Cela nous per- 
met de résoudre partielle- 
ment le problème du hui- 
tième bit et d'accéder au gra- 
phisme 8 ou 9 aiguilles. Les 
huit densités graphiques per- 
mettent les résolutions sui- 



vantes, en nombre de points 
par ligne : 

480, 576, 640, 720, 960, 
1152, 1920. 

A noter que le mode 9 aiguil- 
les ne permet que les modes 
simple et double densités, 
c'est-à-dire 480 et 960 
points. Ces divers modes 
permettent de trouver le 
meilleur compromis qua- 
lité/rapidité ou les meilleures 
proportions en recopie gra- 
phique d'écran. 




87 



Il existe le conpresse,l36 cal 
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Vitesse d'impression : 120 
caractères par seconde en 
qualité normale, et 24 carac- 
tères par seconde en qualité 
courrier. L'impression est 
bidirectionnelle optimisée 
pour les qualités normales, 
c'est-à-dire que le mouve- 
ment de la tête s'effectue de 
la manière la plus rationnelle 
en fonction de la ligne 
actuelle et de la suivante, évi- 
tant au mieux les mouve- 
ments inutiles. Une com- 
mande est prévue pour forcer 
le fonctionnement unidirec- 
tionnel si nécessaire, une 
autre pour faire reculer la 
tête, par exemple pour ajou- 
ter un accent sur une lettre. 

Jeux de caractères : en plus 
des 96 caractères standard, 
elle possède 1 1 jeux de 1 2 
caractères nationaux, les 
caractères graphiques et 
symboles spéciaux IBM et 
EPSON. Il nous est possible 
de définir nous-mêmes 
jusqu'à 94 caractères. Il n'y 
a malheureusement pas les 
caractères graphiques du 
CPC. 

Type d'écriture : à la mise 
sous tension, la C 1 20 écrit 
en PICA, sur 80 colonnes, 
mais il est possible d'obtenir 
l'écriture ELITE, l'italique 
avec expansion ou compres- 
sion, ce qui nous donne le 
choix entre 40, 48, 68, 80, 
96, 136 et 160 colonnes. 
Elle connaît le mode inverse 
(blanc sur fond noir), les indi- 
ces, les exposants, les carac- 
tères gras, la double frappe 
et, bien sûr, la qualité cour- 
rier, le surlignement, le sou- 
lignement et la double 
hauteur. 



Formatage des pages : de 
nombreux paramètres con- 
cernant les formats sont pro- 
grammables. Ainsi, l'on peut 
déterminer l'interligne, l'es- 
pacement des caractères, la 
longueur de page (en nombre 
de lignes ou en pouces), les 
marges haut-bas/droite 
gauche, les fabulations hori- 
zontales et verticales qui sont 
soit absolues, dont toujours 
aux mêmes lignes, soit rela- 
tives, par rapport à la position 
actuelle de la tête. Il est pos- 
sible de mémoriser simulta- 
nément 8 modèles de tablu- 
tations verticales, ce qui 
s'avère très utile pour l'édi- 
tion de formulaires de for- 
mats différents dans une 
même application. L'espace- 
ment des caractères peut 
être proportionnel. L'aligne- 
ment des textes, appelé jus- 
tification, peut se faire à 
droite, à gauche ou des deux 
côtés à la fois, la machine 
modifiant dans ce cas la 
valeur des espaces entre 
chaque mot. 

Panneau de commandes : 
nous y trouvons les trois 
classiques touches de sélec- 
tion en ligne/hors ligne, 
d'avance d'une ligne et 
d'avance d'une page, ainsi 
que les voyants marche, fin 
de papier (il n'y a pas de 
signal sonore) et prêt. Les 
touches ont également des 
fonctions plus intéressantes. 
Elles permettent de choisir 
divers modes de fonctionne- 
ment tels que l'impression 
complète du jeu de caractè- 
res, un test de mémoire et 
d'alignement de la tête, de 
même que le choix d'un type 
d'impression parmi les 5 sui- 
vants : PICA qualité courrier, 



italique, caractères gras et 
compressé. La dernière pos- 
sibilité offerte par ces tou- 
ches est le mode d'affichage 
transparent hexadécimal. 
Cela signifie que l'imprimante 
n'interprète aucune com- 
mande, elle se contente d'im- 
primer la suite des valeurs 
que le CPC lui envoie, d'une 
part en hexadécimal et d'au- 
tre part en clair, c'est-à-dire 
les caractères correspondant 
aux codes. Autre caractéris- 
que intéressante : lorsque les 
valeurs correspondent à des 
codes de contrôles, elle affi- 
che l'abréviation de ce code 
mais le mode d'écriture com- 
pressé rend la lecture 
difficile. 

Sélecteurs de mode : un 
ensemble de 8 mini-interrup- 
teurs situés sur l'interface et 



facilement accessibles grâce 
à une trappe sous la zone de 
passage de la tête permet de 
choisir diverses options à la 
mise sous tension. On notera 
que ces options peuvent éga- 
lement être sélectionnées par 
programme en cours d'utili- 
sation. 

L'interface en question est 
un ensemble de circuits élec- 
troniques qui fait l'adaptation 
des signaux électriques entre 
l'ordinateur et l'imprimante. 
Elle se présente sous forme 
d'un boîtier muni d'un con- 
necteur qui s'insère dans un 
logement de l'imprimante. 
C'est l'échange de cette 
interface qui permet la com- 
patibilité de la C 1 20 avec 
d'autres micros. 

Type de papier : on utilise 
soit des feuilles ordinaires, 
soit du papier à picots. Le 



Impression 

graphique 

en 1920 

points 
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passage d'un type à l'autre 
se fait en installant le guide 
approprié. Le papier en bande 
peut s'introduire par l'arrière 
ou par le dessous de l'impri- 
mante. Un chargeur feuille à 
feuille est disponible en 
option. 

Entretien : la durée de vie du 
ruban est de 2 millions de 
caractères (l'ouverture de la 
cartouche du ruban a révélé 
qu'il est très long) et la tête 
d'impression est annoncée 
pour 100 millions de carac- 
tères. La moyenne de temps 
de bon fonctionnement est 
de 4500 heures pour le reste 
de la machine. Aucun entre- 
tien n'est requis et il suffit 
d'éviter la poussière et 
l'humidité. 

Notice : la notice est en vrai 
français, c'est dire qu'elle est 
exempte des erreurs que l'on 
voit trop souvent dans les 
modes d'emplois lorsque la 
traduction est bâclée. Elle fait 
souvent référence à de nom- 
breuses marques d'ordina- 
teurs, mais jamais à AMS- 
TRAD. A croire qu'AMS- 
TRAD n'existait pas lors de la 
rédaction du manuel. Cela se 
confirme d'ailleurs par l'ajout 
d'une mauvaise photocopie 



qui est destinée à nos pau- 
vres CPC. Elle explique la 
manière de raccorder les 
appareils, mais présente un 
petit défaut : vu que le con- 
necteur peut se brancher 
dans les deux sens, on nous 
indique que le câble de liaison 
comporte un fil de couleur 
sur l'un des côtés, ce qui va 
nous servir de repère pour 
trouver la bonne orientation 
de la prise. Mais ô malchance 
(ou plutôt manque de sérieux) 
le câble en question com- 
porte un fil de couleur de 
chaque côté. Le peu d'infor- 
mations que nous apporte 
cette photocopie est donc 
inutile car le repérage n'est 
plus possible. Voici comment 
procéder, pour ceux qui se 
trouveront face à cette situa- 
tion : l'intérieur de la prise qui 
se branche sur l'imprimante 
comporte quelques numéros. 
Le fil qui porte le numéro 1 
est alors identifié et c'est ce 
fil qui doit se trouver à gau- 
che du CPC lorsque nous le 
voyons côté clavier. Une fois 
le branchement vérifié, vous 
avez intérêt à repérer le côté 
HAUT du câble (en l'écrivant 
ou en collant une étiquette 
sur le connecteur), pour ne 
plus avoir ce problème si 



vous devez la débrancher un 
jour. 

Mémoire tampon (ou buf- 
fer) : d'une capacité de 
4 kilo-octets. Des comman- 
des permettent de la vider, 
d'effacer le dernier caractère 
ou d'effacer une ligne. 

Conclusion 

La CITIZEN 1 20 D comporte 
de nombreuses qualités, 
dues à son développement 
récent, qui sont : la facilité 
d'accès et d'échange des 
pièces sujettes à usure, la 
facilité d'introduction du 
papier et de mise en place 
des systèmes d'entraîne- 
ment, la rapidité, la qualité et 
la diversité d'écriture, la 
capacité de la mémoire tam- 
pon, la possibilité de redéfi- 
nir des caractères, le large 
éventail de possibilités diver- 
ses, un bruit acceptable, un 
prix concurrentiel et la com- 
patibilité multiple. Son défaut 
majeur est de ne pas être 
totalement compatible avec 
les CPC. Les codes de com- 
mandes du BASIC AMS- 
TRAD ayant des significa- 
tions différentes de ceux de 
l'imprimante, cela provoque 
quelques désagréments. Si, 



par exemple, vous utilisez le 
code 24, commandant l'in- 
version des couleurs, obtenu 
par le caractère CONTROL et 
symbolisé par un X souligné 
et surligné, vous provoquerez 
l'effacement de la ligne lors 
d'un listing car CHR$(24) 
commande à l'imprimante un 
effacement de ligne. De plus, 
les caractères graphiques 
propres aux CPC n'existent 
pas. Il faut dire qu'ils ne sont 
de toute façon pas transmis 
par le port imprimante, mais 
nous aurions tout de même 
pu les utiliser, au lieu, par 
exemple, du jeu IBM. La 
compatibilité C120-CPC ne 
se justifie que par le fait que 
les deux appareils travaillent 
au standard EPSON, ce qui 
fonctionne parfaitement pour 
la plupart des logiciels du 
commerce, y compris les uti- 
litaires graphiques. L'impri- 
mante qui a servi pour ce 
banc d'essai a un défaut de 
taille : un décalage aléatoire 
entre les lignes lors d'utilisa- 
tion en mode graphique. 
Mais ce défaut n'est pas 
général à tous les modèles et 
si vous choisissez une CITI- 
ZEN, vérifiez-le en deman- 
dant un essai de recopie 
d'écran avant d'acheter» 



IEMS ATTEL INTELLIGENTS!!! 
POUR FAIRE COMMUNIQUER VOS 
MICROS. 



■ FULL DUPLEX 
300 et 1200 Bps 

■ NUMÉROTATION 

AUTOMATIQUE 

■ COMPATIBLES 
HAYES 

■ SYNCHRONES/ 
ASYNCHRONES 




Leurs SOFTS 




complémentaires" 




de communication "faciles" 

pour PC et COMPATIBLES vous offrent 

■ procédures de communications 
automatiques 

■ connexion à TRANSPAC et sites 
centraux 

■ transferts de fichiers avec ou sans 
procédure de correction d'erreurs 

■ émulation ADM3A, VT - 52/100/220 

■ menus déroulants 

■ gestion de ligne 

■ apprentissage intelligent 



âtîëi, 



DISTRIBUTEURS 



DATA PRINT 

1 rue de l'Yser 
92210 Samt-Cloud 
Tel (1)46020507 
Télex 200584 



RTDM 

10 bis. route d'Ax 
31120 Porter. Garonne 
Tel (16)61503000 
Télex 531019 



TELECOM INF 

74. av Victor-Hugo 

BP 61 ■ 13170 

Les Pennes-Mirabeau 
Tel (16)42 02 54 54 
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UTILITAIRE 



ACTIONS 



Christian PINET 




I 



Aujourd'hui, plutôt que d'épargner, on achète des ac- 
tions. Mais pour suivre les tendances du marché, il faut 
s'intéresser de près à ce qui se passe en Bourse. Ce pro- 

firamme vous aidera, j'espère, a bien gérer votre porte- 
euille. 



Ualeur 
Action 


■wwraw u 










~- — ____ _^--~~ 


466 


COUPS MAXI 






31G 






Senaine 






13 


310 


COURS MINI 







Conseils de saisie 

— Les remarques ne sont là que pour 
indications. 

— Ce programme fait appel à l'utilitaire 
de recopie d'écran de PASCAL HIGELIN, 
paru dans CPC numéros 5 et 1 9 



(COPY.BIN dans ACTIONS). Si vous ne 
voulez pas d'impression, mettez les 
lignes 90 à 110 en commentaires. Les 
paramètres d'impression ont été initiali- 
sés pour une DMP2000. Vous pouvez 
les modifier si besoin est. Le fichier de 
stockage des valeurs saisies s'appelle 
ACTION87. 



Utilisation 

Détail des options du Menu : 

1 - Tout d'abord, il faut saisir le nom, la 
valeur d'achat ainsi que le nombre (0 
pour suivi uniquement) des actions cons- 
tituant votre portefeuille. 

2 - Chaque semaine, il faut saisir la valeur 
des actions (au jour de votre choix) 

3 - Pour la modification, s'il y a eu des 
erreurs de saisie 

4 - Pour la visualisation globale des 
valeurs des actions au fil des semaines. 

5 - Visualisation sous forme de courbe 
de l'évolution de chaque action. 

6 - Valeur du portefeuille (actions dont 
le nombre est différent de 0) semaine 
courante. 

7 - Fin (avec une demande de sauve- 
garde du fichier action 87 si des modifi- 
cations ont été faites). 



Notes 

— Pour les actions du portefeuille (nom- 
bre différent de 0) il est préférable de sai- 
sir la valeur de la semaine courante pour 
éviter d'avoir un bilan erroné. 

— Les courbes représentent l'évolution 
d'une action de la semaine (valeur 
d'achat) à la semaine courante. 

— On peut réutiliser le même nom pour 
une action dans la mesure où on en 
rachète à une valeur différente (il faudra 
alors saisir 2 fois la valeur courante de 
l'action par semaine). 

— Les frais d'achat et de vente ne sont 
pas pris en compte (car ils sont variables 
suivant les banques). A vous de prévoir 
ou de modifier le programme en 
conséquence. 



SUIVI D'EVOLUTION D ACTIONS 
FEVRIER 87 

BUT : PERMETTRE L'EXAMEN RAPIDE 
DE L'EVOLUTION D'UNE OU 
PLUSIEURS ACTIONS SUR 1 
MOIS OU SUR L'ANNEE 

— CHARGEMENT RSX D'IMPRESSION 



10 

20 

40 
50 
60 
70 
80 
90 ON ERROR GOTO 110 



100 SPRINTER, 7, 27, 49, 27, 42, 4, 127, 2. 1,10, 7, 0,1: GOTO 120 

LA 110 CLS: MEMORY ?<922F:L0AD " 'COPY.BIN" :CALL tWWïBQTO 1 

lB 00 'VOIR CPC No 5 et 19 

l_ 120 MODE 2:INK 0,13: INK 1,0 

lD 130 ON ERROR GOTO 1180 

LE 140 GOSUB 1010 'Vers chargement fichier actions 

lF 150 ' Menu principal 

Lu 160 CLS 

LH 170 PRINT:PRINT:PRINT:PRINT:PRINT 

m 180 PRINT" MENU" 



jij 



BD 



90 



190 PRINT " ":PRI >TD 

NT 

2Ô« PRINT " [1] 5 ,>KD 

aisie Nouvelles Actions" 

21Ô PRINT " [21 B >V6 

aisie Hebdomadaire des Cours" 

22« PRINT " [3] 3 >CC 

aisie et Modification par Action" 

23ë PRINT " [4] A >ZN 

■ftichage Tableau Récapitulatif" 

240 PRINT " [53 6 >XR 

raphe par Action" 

250 PRINT ■ E61 B ,>ZH 

ilan Portefeuille" 

260 PRINT " [ 7 ] F /XD 

in" 

270 LÛCATE 1,24: INPUT" Quel est votre choix :":so >BX 

230 ON so GQTÛ 1310. i960, 1500. 300. 660, 2370, 290: GOTO 270 >WZ 

290 GQSuB 2190: MODE l:QO >UH 

300 Tableau récapitulatif >RD 

310 CL3: LOCATE 10, 5: PRINT "No DERNIERE SEMAINE SAISIE >KC 

:";YV 

320 LOCATE 10, 10: INPUT "No SEMAINE DE DEBUT VI5UALI3ATI >TC 

ON":DEBSEM 

330 IF DEBSEM > ïï THEN LÛCATE 10, 10: PRINT " I ;ïW 

«POSSIBLE ":FOR i=l Tû 500: NEXT i:6OT0 32 



340 DEBACT=1 >GE 

350 FINSEM=DEBSEM+6:FINACT=DEBACT+10 ;6A 

360 CLS >UD 

370 BORDER 10: GRAPHICS PEN 1 >WW 

38» ORIGIN 0,0: DRAW 0,395: DRAW 635, 395: DRAW 635,0: DRAW >BA 

0.0 

390 ORIGIN 0.360: DRAW 635,0 >VJ 

400 ORIGIN B2.0:DRAW 0,395:ORI6IN 85,0:DRAW 0,395:FOR I ;KM 

=0 TO 5:ÛRIGIN 165+ ( 1*78). 0: DRAW 0.395:NEXT I 

410 LOCATE 3 . 2 : PR I NT " ACT ION " : : FOR I=DEBSEM TO FINSEMîLù .>VW 

CATE i4+(9.7*iI-DEBSEM)/.2:PRINT"SEM":I:NEXT I 

420 FOR a=DEBACT TO FINACT >VF 

430 IF ACT$(a)="" THEN 470 >RK 

440 LÛCATE 2,2+(ia-DEBACT+l)*2):PRINT MID$(ACT$ta) ,1.9) >UB 

:FOR s=DEBSEM TO FINSEM:IF vaiact ia,s)=0 THEN 4ce 

450 LOCATE 12+U0.2*\s-DEBSEM> ; .2+ua-DEBACT+l)*2) :PRIN ;MT 

T uSING"###tt.##":vALACT'.a,s.; 

4ù0 NEXT s >PJ 

47e NEXT a >NB 

480 LOCATE 3, 25: PRINT CHR$(24>;" Cïimpress.Depiac Semai >PW 

ne i":CHR$(243):"j l":CHR$(242i;") .Deplac Actions (":C 

HR$i241):") (":CHR$(240):"), (ENTER) Pour Menu ";CHR$(24 



490 z$=INKEï$:IF z*="" THEN 490 

500 IF ASC (z$) =243 THEN 580 

510 IF ASC (z$; =242 THEN GOTO 600 

520 IF ASC (z$) =241 THEN GOTO 620 

530 IF ASC (z$) =240 THEN GOTO 640 

540 IF ASCtz$)=13 THEN 150 

550 IF UPPER$(z$)="I" THEN iTEXT.l. 



>YE 

;UN 
>VT 
>YV 
>YX 



,1,24 



►560 GOTO 490 >AA 

570 GOTO 150 >ZE 

580 DEBSEM=BEBSEM+7: IF DEBSEM > yy-6 THEN DEBSEM=yv-6: I >HQ 
F debsem < 1 THEN debsem=l 

590 GOTO 350 >ZJ 

600 DEBSEM=DEBSEM-7: IF DEBSEM < 7 THEN DEBSEM=i >QM 

610 GOTO 350 /ZB 

620 DEBACT=DEBACT+10: IF DEBACT > XX-9 THEN DEBACT=XX-9: >HB 
IF DEBACT < 1 THEN DEBACT=1 

630 GOTO 350 >ZD 

640 DEBACT=DEBACT-10:IF DEBACT < 10 THEN DEBACT=1 ;R0 

650 GOTO 350 >ZF 

660 ' Courbes graphiques >TC 

670 GÛSUB 1440 appel affichage liste des actions >0D 

68e LOCATE 2. 23: INPUT "Entrez le No de l'action :":a >EV 

690 IF a>xx THEN 680 ELSE IF a=0 THEN a=l ;FK 

700 CLS: ORIGIN 0,0:MOVE 40, 200: DRAW 635,200 trace >KW 
de 1 'axe des X 

710 MOVE 40.0: DRAW 40,395 trace ae 1 a;;e des >TP 
V 

720 LOCATE 1,13:PRINT USIN6"####": vaiact (a. 0; valeur >NJ 
d achat 

730 LÛCATE 7. l:PRINT"Valeur": LOCATE 7,2:PRINT"Action" >EV 

740 LOCATE 72. 12:PRINT "Semaine" >CT 

750 LOCATE 76. 14: PRINT yy >lffi 

760 ORIGIN 0.0: MOVE 40.200 >UF 

770 IF vai(iuni(aK>0 THEN dift2=valact(a.0;-vaifflinna.' >QP 
ELSE di-ft2=0 

780 dit'f'i=vaima:u(a)-valactia.0!:IF diff2:. : dif't"i THEN di >NU 
ffl=dif"f"2 

790 IF diff'l=0 THEN ditt=0:GOTO 380 >CV 

800 coetfy=(150/ditfii ,>RQ 

810 coeff>;=INT(590/vv) coetf pour écart entre le ,-TF 
s points 

820 dit"f=0 cours de i action - valeu >PF 
r d achat 

830 FOR s=l TO yy >LH 

840 IF valact(a,s)=0 THEN 860 valeur non fournie on ut >MT 
ilise la précédente dit'f 

850 dit't=valact(a.s;-valacti.a.0) calcul ecart/axe >BW 
des a 

860 DRAW 40+icoeff;;#s, ! .200+idiff#coeff'y; >JU 

870 NEXT s >QD 

860 LÛCATE 1.6:PRINT U3ING"####":valma>;na) >HZ 

890 LOCATE 7, 6: PRINT "COURS MAXI" >CL 

900 LOCATE 1.19:PRINT USING"####":vaiminna; >NJ 

910 LOCATE 7, 19: PRINT "COURS MINI" >DK 

920 LOCATE 30,1:PRINT CHR*(24):' i ":MID*sact*ia),1, 13): " >AZ 

930 LOCATE 45, 1 : PRINT CHR$ (24) ; "NOMBRE : " ; nbract (a) >HB 

940 LÛCATE 32,2: IF ditt"<0 THEN PRINT "PERTE SEM";yy:":" >EG 

;ditt"#nbract(a) ELSE PRINT "PLUS-VALUE 3EM";yy;" :": dit" 

t"*nbract(a) 

950 LOCATE 7,25:PRINT CHR$(24);" (Dmpression, Action ( >KA 

";CHR*(240);") suivante ("iCHR$(241i;") précédente, ENT 

ER pour Menu ":: PRINT CHR»(24) 

THEN 960 >YU 

THEN ICOLOR, 0,0,0,0,0,0,0,0,0: ICO >RF 



>TJ I 960 z$=INKEY$:IF z$= "" 
>kp4970 IF UPPER*(z$)="I" Tl 
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PY, 0, 638, 400, 20, 1,1: PRINTtS, CHR$ i 12) ; : GOTO 960 

980 IF ASC(z$)=240 THEN a=a+l:IF a<=xx THEN 700 ELSE a= >KD 

a-l:GOTO 960 

990 IF ASC(:$)=241 THEN a=a-l:IF a>0 THEN 700 ELSE a=a+ >GV 

1 : SOTO 960 

1O00 GOTO 150 >EC 

1010 ' Chargement du fichier Action87 >XE 

1020 0PENIN"action87 >TU 

1030 INPUT#9,xx 'Recup nbre d'actions suivies >LA 

1040 INPUT#9,yy Recup nbre de semaines stockées ,>LD 

1050 xxm=xx+10:yym=yy+10:DIM act*(xxm),valact(xxm,yym), >MM 

nbract(xxm),valmaxi(xxm),valmini(xxm) marge de securi 

te +10 actions pour 10semaines de saisie 

1060 FOR a=l TO xx 'chargement par action >LD 

1070 INPUT#9,act$(a) recup du nom de l'action >PT 

1080 INPUT#9. nbract (a) recup du nombre d'actions ache /RE 

tees 

1090 FOR s=0 TO yy et Par semaine ,>LC 

1100 INPUT#9,valact(a,s) de la valeur correspondante >UV 

1110 IF s=0 THEN vaimini<a)=valact(a,5):valmaxi(a)=vala >Z0 

et (a, s): GOTO 1150 

1120 IF valact(a,s)>valmaxi(a) THEN valmaxiia)=valact(a >FM 

,s) recup maxi 

1130 IF valact (a, s) =0 THEN 1150 >YB 

1140 IF valact (a,sKvalmini (ai THEN valmini(a)=valact(a >FH 

,s) recup mini 

1150 NEXT s >WC 

1160 NEXT a passage a l'action suivante ;UF 

1170 CLOSEIN:RETURN >QD 

1180 Gestion des erreurs >YC 

1190 IF ERR=9 THEN 1270 dépassement de capacité MJK 

1200 IF ERR=32 AND DERR=146 THEN 1210 ELSE 1250 /LE 
1210 CLS:LÛCATE 12,12:PRINT"FICHIER ACTIONS? INEXISTANT >EV 

":L0CATE 10,14:INPUT "CREATION FICHIER iO/N) ",z$ 
1220 IF UPPER$(:$)="0" THEN CLS:LOCATE 12. 12: INPUT "No >6Y 
SEMAINE DU DEBUT DE LA SAISIE (1 a 52) : ",yy:yy=yy-l:DI 
M actt (20) , valact (20, 20) , nbract (20) : RESUME 1 170 
1230 IF UPPER$(:$K>"N" THEN 1210 ELSE CLS:LOCATE 6,12: >DB 
PRINT "Insérer la disquette contenant le fichier ACTION 
87":L0CATE 10,14:PRINT "Appuyez sur une touche" 
1240 IF INKEY*="" THEN 1240 ELSE RESUME 1010 >JR 
1250 PRINT"Erreur numero";ERR;" ligne";ERL:FOR T=l TO 5 >TX 
00: NEXT 

1260 RESUME NEXT >ME 

1270 IF xx>xxm THEN xx=xxm ELSE yy = yym suppression >HJ 

dernière saisie 
1280 CLS:LOCATE 12,12:PRINT"TR0P DE SAISIES FAITES — > >AH 

SAUVEGARDE PUIS RUN A NOUVEAU" 

1290 LOCATE 15,14:PRINT"DERNIERE SAISIE NON PRISE EN CO >LC 
MPTE" 
1300 60SUB 2210: END vers sauvegarde >NB 

1310 Rajout actions >XH 

1320 CLS >ZF 

1330 LOCATE 2, 10: INPUT" ( RETURN si FIN ! Nom de la nouv >NF 
elle action :";act$ 

1340 IF act*="" THEN 160 pas de nouvelle action >QF 
1350 LOCATE 2, 12: INPUT" ( OBLIGATOIRE ) Valeur d'achat o >UN 




^u cours actuel :"jactr 

1360 IF actr=0 THEN 1350 >RJ 

1370 LOCATE 2, 14: INPUT" ( FACULTATIF ) Nbre d'actions a >DX 
chetees :";nbr 

1380 fmaj=l mise a jour donc sauvegarde >XB 

1390 xx=xx+l:act*(xx)=UPPER$(act$):valact(xx,0)=actr >AT 
stockage valeurs 

1400 valmim(xx)=actr:valmaxi(xx)=actr >KN 

1410 IF nbr=0 THEN 1420 ELSE nbract (xx)=nbr >LJ 

1420 GOTO 1320 : MA 

1430 — Affichage de la liste des Actions — >YA 

1440 CL5:y=0:x=0 >LA 

1450 LOCATE 2, 2: PRINT "No ACTION" >CV 

1460 FOR a=l TO xx >LH 

1470 y=y+l:IF y=10 THEN y=0:x=x+l:GOTO i470 >KZ 

1480 LOCATE 2+(x*14i ,2+(y*2):PRINT CHR$(24):a;CHR$i24ï; >AU 
" ":MID$(act$(a),l,9) 

1490 NEXT a: RETURN >NR 

1500 Saisie et modif par action >XJ 

1510 GOSUB 1440 affichage de la liste des >WJ 

actions + No 

1520 LOCATE 2, 23: INPUT "No de l'action a modifier i";a /GY 

1530 IF a=0 THEN GOTO 160 )RA 

1540 IF a>xx THEN 152Ô >PQ 

1550 CLS >AA 

1560 WIND0W#2, 1,80, 1,22 >RL 

1570 L0CATE#2,2,2:PRINT#2,CHR$(24) ;act$(a) ;CHR$(24) m 

1580 LOCATE#2,20,2:PRINT#2,"Nombre :";nbract(a) >UY 

1590 LOCATE#2,40,2:PRINT#2, "Valeur d'achat :";valact(a, >JH 

0) 

1600 j=0:k=0:FOR s=l TO yy:L0CATE#2,2+(j*14),4+k:PRINT# >ME 
2,"Sem";:PRINT#2,USIN6"##";S;:PRINT#2,USING"####.##";va 
lactia,s);:PRINT#2,"!":j=j+l:IF j=5 THEN j=0:k=k+l 
1610 NEXT s >WD 

1620 LOCATE 1,24: PRINT STRING*(79," "1 >FP 

1630 LOCATE 1,25: PRINT STRING$(79," ") >FR 

1640 LOCATE 10,24:PRINT" (Siuppression de l'action (M)od >AZ 
ification des valeurs" 

1650 LOCATE 5,25:PRINT"(C)hangement nom (Rietour liste >TK 
(N)ombre différent (I)mpression" 

1660 :*=UPPER$(INKEY$):IF :$="" THEN 1660 >HE 

1670 IF z*="S" THEN 1730 >« 

1680 IF z$="M" THEN 1820 >QU 

1690 IF i$="C" THEN 1910 >QJ 

1700 IF :$="N" THEN 1930 >QP 

1710 IF :$="I" THEN 1950 >QM 

1720 GOTO 1510 retour affichage liste >ME 
1730 CLS: LOCATE 35, 102: PRINT CHR*(24);" ";act$(a);" ":P >QA 
RINT CHR$(24) 

1740 LOCATE 5, 12: INPUT "Vous confirme: la suppression de ,>Zl 
l'action (0/N)",:$:IF UPPER$(:$)= "0" THEN 1750 ELSE 1 
550 

1750 IF a=xx THEN 1800 >PU 

1760 FOR i=a TO xx-1 décalage des autres actions >NP 

1770 act$(i)=act*(i+l):nbract(ii=nbract(i+l):FOR j=« TO >CP 
yy : valact ( i , j ) =valac t ( i+i , j ) : NEXT j 
1780 NEXT i >WB 
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179â act*(xx)="" 
18BÔ xx=x:<-l:fma.i=l 



nombre d'actions restantes 
pour afficher la nouvelle lis 



1810 BOTO 15BB 
te 

182Ô LOCATE 1.24:PRINT STRING*(4B." "):LÛCATE 40.24:PRI 
INT"Return pour autre modif" 

183Ô LOCATE 1.25:PRINT STRINGX79." "):L0CATË" 3.24: INPU 
T "No de semaine a modifier :";s:IF s=w THEN GOTO 1620 
EL5E IF s>yy THEN PRINT"Semaine non saisie":FOR i=l TO 
500:NEXT lîGOTQ 1830 

1840 LOCATE 3,25:PRINT"Valeur semaine":s::PRINT USIN6"# 
###.##";valact(a,s):LOCATE 30.25:INPUT"Entrer nouvelle 
valeur ou fieturn : !l ;valact 

1850 IF valact=0 THEN GOTO 1830 ELSE valâct(a,S)-«alact 
:-ftaj=l 

1860 IF vaiactfa.s)>vaimaxifa) THEN val«axi(a)=valact(a 
,s) 

1870 IF valactfa.sKvaimini (a) THEN val«ini(a)=valact(a 
>s) 
1880 n=INT(s/5)+l:«F(n#5)-s:IF m=5 THEN k=n-2: 1=4: GOTO 

1900 

1890 k=n-l: 1=4-0 

190B L0CATE#2,2+U*14).4+k:PRINT#2.CHR$f24;:"Sem":s;:PR 

INT#2.USING"####.##";vaiactia,s):FRINT#2.CHR$i24):G0T0 

1820 

1910 LOCATE 1.24:PRINT STRINGlièB." "):LOCATE 55.24:PRI 

NT"Return pour autre modif" 

1920 LOCATE 1,25:PRINT STRING*i79." "i:LOCATE 3,24: INPU 

T "Nouveau nom pour 1 action :":act$:IF act$="" THEN 16 

20 ELSE act*ia)=UPPER$iact$):fmaj=l:60T0 1550 

1930 LOCATE 1,24:PRINT STRING$(60," "hLÛCATE 55,24:PRI 

NT"Return pour autre modif ' 

1940 LOCATE 1.25: PRINT STRIN6$<79," "):LOCATE 3. 24: INPU 

T "Nombre d'actions détenues : ir ;nbract:IF nbract=nbract 

ta) THEN 1620 ELSE nbractfa^nbrachfma^hGOTO 1550 

1950 iTEXT, 1,80, 1,23: GOTO 1620 

i960 Saisie hebdomadaire 

1970 CLS 

1980 WIND0W#2, 1,80,4,6 

1990 PRINT#2,CHR$(24> 

2000 FOR i=l TO 3:L0CATE#2,l,i:PRINT#2, STRING$f80," ") 

:NEXT î 

2010 L0CATE#2.5,2:PRINT#2, "ACTION" 

2020 L0CATE#2.22,2:PRINT#2. "SEMAINE" 

2030 L0CATE#2,55,2:PRINT#2, "COURS" 

2040 LOCATE 5,2:PRINT "Si aucune valeur n est entrée .1 

a saisie hebdc n est pas prise en compte" 

2050 yy-v'v+1 semaine de saisie 

2060 FOR a=! TO xx 

2070 LOCATE 3,6+a:PRINT ;act$(a) nom de I action 

2080 LOCATE 21,6+a:PRINT ;yv semaine de saisie 

2B90 LOCATE 54,6+a: INPUT:vaiact valeur de 1 action 

2100 IF valact=0 THEN 2150 

2110 vaiact(a,yy)=valact stockage valeur saisie 

2120 IF valactfa.yy) >valmaxi(a) THEN valmaxifa)=va-iactf 

a.vy) 

2130 IF valact(a,yyi ; .valminiiaJ THEN valminna)=valact\ 



>FJ 

,>PB 

>HD 

>XC 

>xv 

;GR 

>JF 
>FZ 

>FU 

>DZ 

>LV 
>TM 



/XN 



>m 



>YV 
>YJ 
>A6 
>QE 

>0D 
>GC 

>CH 
>EU 
>DE 
>L6 

>KB 

/LE 
>2F 
>XD 
>AB 
/TA 

>vg 

/JW 



a,yy) 

2140 fsaisie=l:fma.j=l flaqs saisie et mise a jour mis >RF 



2150 NEXT a 

2160 IF fsaisie=B THEN yy=yy- 1 'pas de saisie pour cett 

e semaine 

2170 fsaisie=B flaq de saisie a zéro 

2180 PRINT#2,CHR*(24/:GQT0 150 retour au menu 

219B Sauvegarde fichier ACTI0N87 

220B CLS 

2210 IF fma.j=0 THEN RETURN 

2220 LOCATE 10, 16: INPUT "SAUVEGARDE (Q/N)":z* 

2230 IF UPPER$(z$)="N" THEN RETURN 

2240 IF'UPPER$iz*K>"Q" THEN 2220 

2250 OPENOUT "action87 

2260 PRINT#9,xx 

2270 PRINT#9,yy 

2280 FOR a=l TO xx 

2290 PRINT#9.act$ia) 

2300 PRINT#9.nbract(a) 

etees 

2310 FOR s=0 TO yy 

r d'achat 

2320 PRINT#9,valact(a.s) sauve les valeurs de l'action 



'sauve le nom de 1 action 
sauve ie nombre d'actions ach 



>UF 
>YC 

/AH 
/VA 
>YE 
>ZP 
>VY 
/PD 
>CC 
>ZB 
>UE 
/LD 
>LG 
>U 
/PV 
>RX 



semaine pour stockage val eu >LY 



valeur suivante 
action survante 
fermeture fichier 



2330 NEXT s 
2340 NEXT a 
235B CLOSEOUT 
2360 RETURN 

2370 Bilan Complet de la situation 

2380 CLS: LOCATE 15, 2: PRINT "Semaine ";vv:" Votre portât 

euilïe se compose de" 

2390 totaux=B:total=0:k=l:FOR a=l TO xx 

2400 IF nbract(a)=0 THEN 2450 ELSE LOCATE 5.4+k:PRINT n 

br act fa): LOCATE 9,4+k:PRINT ii Actions":L0CATE 19,4+k:PRIN 

T act$(a) 

2410 LOCATE 49.4+k:dift=valactià,yv)-valact ia.0j:IF dif 

f<0 THEN PRINT"Perte :': ELSE PRINT"6ain :": 

2420 c=valactfa.0)*nbract!a):LOCATE 35,4+k:PRINT "(COUT 

=";c;")":totaux=totaux+c 

2430 b=diff*nûractfa):LÛCATE 57,4+k:PRINT b: total=total 

+b:LOCATE 66.4+k:PRINT USING"+###.#";b*100/c::PRINT "V 

2440 k=k+l 
2450 NEXT a 

2460 LOCATE 26. 5+k: PRINT "SOMME INVESTIE=": LOCATE 41.5+k 
:PRINT totaux 

2470 LOCATE 39,6+k:IF total/0 THEN PRINT"TOTAL PLUS-VAL 
UE: " ELSE PRINT" PERTE : " 

2480 LOCATE 57,6+k:PRINT totai:LOCATE 66,6+k:PRINT U5IN 
6"+###.#";total*100/totaux::PRINT "X" 
2490 LOCATE 25, 25: PRINT CHR$f 24):" (Dmpression (ENTER 
) Pour Menu ";CHR$f24! 
2500 z*=INKEY*:IF z*="" THEN 2500 
2510 IF UPPER»fz*!<>"I" THEN 160 

2520 PRINT#8. CHRîf 27) :"ê": iTEXT. 1.80,1. 24: PRINT#8.CHR$! 
12); 
♦ 2530 GOTO 160 



>UX 

>UG 
>ZA 

>FE 
>YE 



•HG 
BQ 



>UQ 
HJ1 

>JB 

KF 

m 

■w 

PT 

►EX 

>HU 

>ZD 
YR 
>6F 

Fl • 



93 




&0SL 



téimL 



Yves GERAULT 



4 e partie 



N 




ous avons maintenant à notre dispo- 
sition tout un arsenal de possibilités 
pour résoudre nos problèmes : des fonctions, des procédures, mais il nous manque 
des outils pour faire exécuter une partie du programme plusieurs fois ou pour ne 
pas faire exécuter une autre partie en fonction d'un critère évolutif. Il nous man- 

Sio les instructions de boucles (les itérations) et les instructions de tests (les débran- 
ements). C'est à cela que nous allons consacrer cet article. 



LES INSTRUCTIONS 
DE DEBRANCHEMENTS CONDITIONNELS 

Elles sont au nombre de deux. La première est proche du ON 
< variable > GOTO xx,yy,zz,.... du BASIC, la seconde est pro- 
che du IF ... THEN ... ELSE, mais en beaucoup plus perfor- 
mant et en beaucoup plus agréable à l'œil, ce qui permet de 
faire des choses beaucoup plus complexes en toute simplicité. 

Les concepteurs du langage PASCAL ont essayé de faire res- 
sembler leur langage avec celui que le scientifique utilise dans 
son langage courant, nous allons donc pouvoir "PARLER" le 
langage PASCAL en français pour définir nos ordres, il nous 
suffira après de traduire cela en anglais et le tour sera joué. 
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INSTRUCTION CASE 

Cette instruction est du type : SUIVANT QUE LE TEMPS EST : 
ENSOLEILLE ALORS J'IRAI A LA PLAGE, PLUVIEUX ALORS 
J'IRAI PECHER DES GRENOUILLES, NEIGEUX ALORS J'IRAI 
FAIRE DU SKI, DANS LES AUTRES CAS JE RESTERAI CHEZ 
MOI. Cette phrase peut bien sûr être représentée de façon 
plus parlante par le schéma de la figure 1 . Nous sommes déjà 
très loin des possibilité très sommaire du BASIC, mais PAS- 
CAL peut encore mieux faire. 

Il n'y a aucune raison pour limiter à une action ce que nous 
pouvons faire dans chacun des cas. Le début de ma phrase 
pourrait commencer par SUIVANT QUE LE TEMPS EST : 
ENSOLEILLE ALORS J'IRAI A LA PLAGE, JE ME BAIGNERAI, 



- Figure 1 - 



suivant que le temps est: 

- ensoleillé ; à la plage 

- pluvieux > pécher des grenouilles 

- neigeux — > -faire du st:i 



autres cas 



rester chez moi 



_ Figure 2 _ 



sui vant 


que le temps 


est: 








- ensolei lié 


;; 


a la plage 
me baigner 
me bronzer 






- pluvieux 


: 


pêcher des 


grenoui 1 1 es 




- neigeux 













Figure 3 





3 INSTRUCTIONS SIMPLES 


1 INSTRUCTION MULTIPLE 




a:= b+c; 




beg i n 

a:= b+c; 

g: =co5 (a) ; 

writeln (a:2,g:6:4); 
end; 


g : = cos (a) ; 


writeln (a:2,g:6:4); 











— Figure 4 — 
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_ Figure 5 _ 



q 


r 


P 


VRAI 
FAUX 
VRAI 
FAUX 


VRAI 
VRAI 
FAUX 
FAUX 


VRAI 
VRAI 
VRAI 
FAUX 



JE ME BRONZERAI, PLUVIEUX... La figure 2 rend compte de 
façon schématique de cette formulation. Pour un cas donné 
^ENSOLEILLER, nous avons trois actions à effectuer. La 
structure de BASIC ne permettait pas d'accomplir cet exploit, 
par contre PASCAL le permet grâce à sa notion de BLOC. 
Passons maintenant à la traduction en PASCAL TURBO et, 
pour cela, écrivons un programme qui admet en entrée un chif- 
fre et qui écrit sur l'écran le mois qui lui correspond en toute 
lettre (programme 1). 

Nous voyons que le mot clef qui introduit l'instruction est le 
CASE. Ce mot clef est suivi d'identificateur qui peut être de 
type INTEGER, BOOLEAN, CHAR..., mais qui ne peut pas être 
du type REAL. Cet identificateur est suivi du mot réservé OF. 
Nous venons de définir l'entête de notre instruction, il est à 
noter que celle-ci ne se termine pas par un < ; > . 
Aligné sur notre mot clef CASE se trouve, quelques lignes plus 
loin, le mot clef END suivi de son < ; > signalant la fin de notre 
instruction. Entre ces deux mots clefs se trouvent 1 3 BLOCS 
dont 1 2 sont de structure identique et 1 d'une structure dif- 
férente qui peut ne pas exister mais alors cela peut, dans cer- 
tains cas, donner des erreurs très difficiles à déceler. 
Les 12 blocs identiques sont, bien sûr, les 12 mois de l'an- 
née qui sont traités de manière similaire : le contraire serait 
logiquement inconcevable. Chaque bloc est composé d'une 
valeur QUI DOIT ETRE DU TYPE CONSTANTE suivi du sépa- 
rateur < : > , lui-même suivi de l'instruction à exécuter (écrire 
sur l'écran le mois adéquat), elle-même suivie du séparateur 

< ; > qui sépare chacun des blocs. Cependant, pour des rai- 
sons que nous n'expliciterons pas ici DANS LA MESURE OU 
IL EXISTE UN DERNIER BLOC D'UN TYPE DIFFERENT DES 
PRECEDENTS, LE DERNIER DES BLOCS IDENTIQUES NE SE 
TERMINE PAS PAR LE SEPARATEUR <;>. 

Le dernier bloc est introduit par un mot clef particulier ELSE 
suivi par l'instruction à exécuter. Vous pouvez noter que cette 
instruction devrait se terminer par un séparateur < ; > , mais 
que dans la majorité des cas, les programmeurs ne le met- 
tent pas du fait d'une subtilité du PASCAL : l'ensemble 
< blanc > suivi des trois lettres <e> <n> <d> suivi d'un 

< blanc > est considéré par le compilateur comme un sépa- 
rateur, cela pour gagner quelques petites millisecondes à la 
compilation, cet avantage est moins nécessaire en PASCAL 
TURBO, mais se justifiait dans les versions précédentes des 
compilateurs PASCAL. 

Ce dernier bloc constitue une sécurité pour le programmeur 
en PASCAL. En effet, si jamais le programme donne à l'iden- 
tificateur qui suit le mot CASE une valeur bizarre non prévue 
par le programmeur, celui-ci en sera informé. En l'absence de 
ce filet, il peut dans certains cas se produire des choses pour 
le moins curieuses et vous risquez de passer de nombreuses 
heures avant de suspecter cette instruction, alors prenez tout 
de suite de bonnes habitudes et mettez votre ceinture de sécu- 
rité. 

Le programme 2 traite d'un autre exemple dans lequel il est 
demandé en entrée un caractère ; en sortie, il est écrit sur 
l'écran la saison en toute lettre. II s'agit en fait du même exem- 
ple que précédemment, mais appliqué à des variables du type 
CHAR comme le précise d'ailleurs le bloc déclaration. Vous 
noterez qu'il ne faut pas confondre l'identificateur <p> avec 

< 'p'> qui représente le caractère p. De toute manière, PAS- 
CAL TURBO est sympa, il compile pour vous et vous signa- 
lera cette erreur. Bien sûr, vous pouvez lui faire une subtilité 
qu'il ne détectera pas : c'est d'avoir déclaré par ailleurs l'iden- 
tificateur <p> comme constante de type CHAR au préala- 
ble... (sans commentaire). s 

Le programme 3 nous ouvre d'autres possibilités quant aux 
possibilités de choix de valeurs que peut prendre la variable 
<car>. 

Le premier bloc traite des voyelles. Comme elles conduisent 
toutes au même traitement, il est possible de simplifier l'écri- 
ture par une ENUMERATION de toutes les possibilités sépa- 
rées par des < , > . 

Le deuxième BLOC traite le cas de chiffres. II ne diffère du 
premier que par une disposition différente. II faut se rappeler 
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que PASCAL fait une distinction entre ligne éditeur et ligne 
PASCAL (voir articles précédents). Cela permet de compo- 
ser une agréable présentation et d'effectuer plus facilement 
des corrections plus aisées le cas échéant. 
Le troisième bloc traite le cas des symboles. ^ ' ' ..7'^ 
signifie à partir du caractère < blanc ^ jusqu'au caractère 
^/>. Le mot réservé est ^ blanc ^ ^.^ ^.^ ^ blanc ^ et 
comme c'est un mot et donc un identificateur, il ne doit pas 
renfermer de séparateur à l'intérieur, ce qui signifie que les 
deux points doivent IMPERATIVEMENT ETRE COTE A COTE. 
Cette notation sera utilisée ultérieurement de façon intensive 
et est donc à connaître. Elle représente un INTERVALLE et 
ne doit pas être confondue avec la notation précédente 
l'ENUMERATION. 

Le quatrième bloc traite le cas d'autres symboles dont le code 
ASCII est compris, la valeur 58 et la valeur 64. Le caractère 
# signifie donc < caractère dont le code ASCII est>. 
Le cinquième bloc est analogue au précédent quant à la cons- 
truction, mais les valeurs sont indiquées en hexadécimal 
comme l'indique le caractère <$> qui précède les valeurs 
5B et 60. < # £ 5 > se lit donc comme étant le caractère dont 
le code ASCII est 5B en hexadécimal. 

Le sixième bloc est aussi un INTERVALLE dont les bornes sont 
des identificateurs. Ceux-ci étant déclarés comme constante, 
le compilateur les acceptera. 

IL EST EVIDENT QUE L'ORDINATEUR NE PEUT ACCEPTER 
DEUX SOLUTIONS A SON CHOIX POUR UN PROBLEME 
DONNE. IL NE PEUT DONC PAS ADMETTRE QU'UNE 
VALEUR D'OPTION SE RETROUVE DANS DEUX BLOCS DIS- 
TINCTS. 



Figure 6 
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q: =true; 
a:= q 


r : =f aise; 
AND T 


v:=t 
OR 


rue; 

V 


z :=f aise 

AND NOT z 


1 

2 
3 
4 


a:= true 
a:= true 


AND false 
AND (aise 


DR 

OR 

OR 
< 

or 


true 
true 
true 


AND NOT -false 


AND true 
AND true 


a: = 

a: = 

< 
a: = 


false 
f aise 




true 




true 







INSTRUCTIONS SIMPLES 
INSTRUCTIONS MULTIPLES 

Nous venons de voir que chaque bloc de l'instruction CASE 
doit contenir une valeur CONSTANTE SIMPLE, ENUMEREE, 
INTERVALLE suivie du caractère < : > suivi D'UNE INSTRUC- 
TION qui se termine par le caractère < ; > , sauf celle qui pré- 
cède le ELSE qui n'a pas ce <;>. 

Ce n'est pas un hasard si nous avons mis en gras < UNE INS- 
TRUCTION >, car il ne doit y avoir qu'une SEULE INTRUC- 
TION entre <:> et <;>. Mais celle-ci peut être simple ou 
multiple. 

Pour transformer une suite d'INSTRUCTIONS SIMPLES en une 
INSTRUCTION MULTIPLE, il suffit de faire de ces instructions 
simples un bloc qui sera ouvert par le mot clef BEGIN et qui 
sera fermé par le mot clef END. La figure 3 vous montre la 
syntaxe d'une telle transformation et le programme 4 vous 
donne un exemple d'utilisation d'instructions multiples dans 
l'instruction CASE. 



Figure 8 





q: =true; 
a:= q 


r : =f al se; 
AND (r 


v: =true; 
OR v) 


zs=-false 
AND NOT z 


1 

4 


a: = 
a: = 
a: = 

a: = 

a: = 


true 
true 
true 


AND(f aise 
AND (-false 


OR 
OR 


true) 
true) 


AND 
AND 
AND 
AND 


NOT false 


true 
true 
true 


AND true 




<. 


true 






true 









LIMITES D'UTILISATION 
DE L'INSTRUCTION CASE 

L instruction LASL est très performante, elle permet de plus 
de disposer d'une présentation plaisante à la vue et facile à 
comprendre. Elle présente cependant deux limitations très 
sévères : la variable ne peut pas être du type REAL et elle 
n'admet que des choix constants non modifiables par pro- 
grammation. 

Comment s'affranchir de ces limitations ? De deux manières 
très différentes. La première consiste en l'utilisation ration- 
nelle des opérateurs booléens, la seconde consiste en l'utili- 
sation de l'autre instruction de débranchement conditionnel 
IF .. THEN .. ELSE. Mais comme une bonne utilisation de l'ins- 
truction IF THEN ELSE passe par la maîtrise des opérateurs 
booléens, il n'y a pas d'autres solutions que de se lancer dans 
cette étude. Mais que personne ne s'affole, ces booléens c'est 
simple et ça simplifie tellement les choses que pour un modi- 
que effort, nous allons faire un grand pas vers la structura- 
tion de notre programmation. 



- Figure 9 - 



= 


Désigne l'égalité, à ne pas confondre avec 
1 'affectation (:=) 


> 


Désigne 


la supériorité. 


< 


Désigne 


1 ' infériorité. 


<> 


Désigne 


1 'inégal ité. 


-> = 


Désigne 


la supériorité ou l'égalité. 


< = 


Désigne 


l'infériorité ou l'égalité 
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LE TYPE BOOLEEN 

Les booléens définissent en PASCAL un type, c'est-à-dire que 
PASCAL définit les objets que nous pouvons manipuler et les 
actions que nous pouvons effectuer sur ces objets. 
Tout d'abord, définissons les objets manipulables. Ils sont au 
nombre de deux : VRAI et FAUX. Il est évident que les actions 
que nous allons pouvoir effectuer vont être très limités du fait 
du très petit nombre d'objets. Tant mieux, ce sera plus sim- 
ple. 

Définissons maintenant les actions possibles. Viennent en pre- 
mier, comme dans le cas des entiers, les opérateurs qui per- 
mettent d'effectuer des opérations sur ces booléens en défi- 
nissant des expressions booléennes comme nous avons défini 
des expressions arithmétiques. Ces opérateurs ne sont eux 
non plus pas nombreux puisqu'il n'y en a que trois de vrai- 
ment intéressant : <ET> ; <OU> ; <NON>. viennent 
ensuite les instructions que nous pouvons appliquer à ces 
variables booléennes, les principales sont l'affectation, la com- 
paraison et le classement. 







— Figure 


10 - 










var 


revenu : 

imposable, 

cel ibataire : 


real : 
bool 


ean 


; 






oegi n 
















i mpos 


able: 


= cel ibatai re 


ind 


(re 
<- 

<- 


venu > 
> 

real 


1QÛOO. 

< 

real 


00) ; 
-> 


bool 


ean 


bool ean 


boo 


ean 





est supérieur à 10000 F et qu'il est célibataire. La figure 10 
donne le listing de cette proposition en PASCAL. 



LES OPERATEURS BOOLEENS 

• L'OPERATEUR ET — Si nous définissons trois variables boo- 
léennes p,q,r, et que nous affectons à p le résultat de l'ex- 
pression < p ET r > nous obtiendrons le tableau de vérité 
que nous montre la figure 4. Ce qui est à retenir, c'est que 
p est vrai si et seulement si <q est vrai> ET <r est vrai> . 

• L'OPERATEUR OU — Avec nos mêmes variables, si main- 
tenant nous affectons à p le résultat de l'expression <q OU 
r > , nous obtenons le tableau de vérité de la figure 5. Ce qui 
est à retenir, c'est que p est vrai si <q est vrai> OU <r est 
vrai>. 

• L'OPERATEUR NON — Cet opérateur est un peu spécial 
car il n'agit que sur la variable qui suit, il est dit de ce fait 
OPERATEUR UNAIRE. La figure 6 nous donne le tableau de 
vérité de cet opérateur pour lequel nous affectons à la varia- 
ble p le résultat de l'expression booléenne <NON q>. 

LES EXPRESSIONS BOOLEENNES 

Il est bien sûr possible de chercher à déterminer la valeur d'ex- 
pression booléenne plus compliquée du genre <q ET r OU 
v ET NON z > , mais alors, comme pour les opérateurs arith- 
métiques, il faut déterminer une priorité afin qu'il n'y ait pas 
de confusion. Les opérateurs booléens sont classés par ordre 
de priorité croissante OU < ET < NON. En cas d'égalité de 
priorité, l'expression est calculée de gauche vers la droite. 
Il est toujours possible de forcer les priorités en mettant des 
parenthèses, comme en BASIC d'ailleurs. Dans ce cas, le con- 
tenu des parenthèses est effectué en premier. 
Les figure 7 et 8 illustrent le mode calcul des expressions 
booléennes. 

LES OPERATEURS RELATIONNELS 

Ces opérateurs permettent de faire les tests, ils sont au nom- 
bre de six et sont donnés à la figure 9. Pour effectuer un test, 
il suffit d'écrire : 

résultat: = valeur. 1 > .2 

Ce qui se lit affecté à la variable résultat la valeur du booléen 
obtenu par la proposition valeur .1 supérieur à valeur .2. La 
valeur de la variable résultat ne peut être que vrai ou faux : 
VRAI si valeur .1 est réellement supérieure à valeur .2 ; FAUX 
dans le cas contraire. 

Les variables valeur 1 et valeur 2 peuvent être de n'importe 
quel type, MAIS ILS DOIVENT TOUS LES DEUX ETRE DU 
MEME TYPE. 

Il est possible de faire agir en même temps les opérateurs rela- 
tionnels et les opérateurs booléens. Par exemple, supposons 
qu'une personne soit imposable sur le revenu si son salaire 



LES CLASSEMENTS 

Nous verrons qu'il est nécessaire d'établir un classement entre 
les deux objets de notre type. PASCAL le définit comme VRAI 
> FAUX. Nous pouvons mettre en évidence cette propriété 
en demandant à l'ordinateur de vous donner l'ordinal de vrai 
et de faux. 

a:= ord (true); 
b:= ord (false); 

Si vous affichez le résultat, vous aurez 1 pour a et pour 
b. Notre ensemble est donc bien ordonné. 




SOUS QUELLE 

ETOILE 
SUIS^J^J^? 

290 F. 

La disquette double-face 



MIROIR 
ASTRAL 

Avec une date, une heure et un lieu de naissance, 
votre CPC établira un portrait psychologique 
approfondi d'environ 15 pages sur imprimante ! 
Un logiciel qui vous étonnera par sa profondeur ! 
(version familiale d'un logiciel utilisé par les professionnels) 



O 

"5 



Astropsychanalisez votre famille, vos amis, 
comme les plus grands hommes célèbres... 



Commandez votre disquette pour CPC 6128 ou CPC 664 
(PORT GRATUIT) à : 

Bernard VILLEMIN 

317, Av. de Verdun - 831 10 SANARY - Tél. 94 74 32 00 
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i 






program proçj 


raml 


( i npt 






xt , output ) ; 








var mois 


: integer ; 






begi n 












wri te ( 'en 


trer 


une valeur entre 


1 


et 12 compris : '); 


readl n (mois) ; 










case mois 


of 










■CBLOC 


1] 


1 




wri tel n 


< 


JANVIER 


) ; 


CBLOC 


23- 


2 




wri tel n 


( 


FEVRIER 




CBLOC 


■y t 


3 




wri tel n 


< 


MARS 




CBLOC 


4> 


4 




wri tel n 


( 


AVR I L 




•CBLOC 


53 


5 




wri tel n 


( 


MAI 




•CBLOC 


63- 


6 




wri tel n 


( 


JUIN 




CBLOC 


73- 


7 




writeln 


( 


'JUILLET 




CBLOC 


8> 


8 




: writeln 


( 


'AOUT 




CBLOC 


93 


9 




: writeln 


< 


'SEPTEMBRE 




CBLOC 


103 


10 




: wri tel n 


( 


'OCTOBRE 




{BLOC 


113 


11 




: writeln 


< 


' NOVEMBRE 




CBLOC 


12} 


12 




: writeln 


< 


'DECEMBRE ') 


CBLOC 


133- 


el se 


wri tel n 


< 


'DESOLE IL N Y A QUE 12 MOIS') 


end ; 












end .O 














Listing 2 



program program2 (i nput , output ) 



var 



caract 






char 



begi n 

write ('entrer un 
readln (caract); 



caractère 



» 



3jP 






iL'HEBKaamïnipss saawnsa (sommes 

LËNS 

VOTRE 

NOUVEAU 

SPÉCIALISTE 

AMSTRAD 

OUVERT DE 9 h à 12 h 
et de 14 h à 19 h 
sauf lundi matin 

20, rue de la Gare 

(face au commissariat de police) 

62300 LENS 
Tél. 21.28.42.24 



URGENT!!! 

Occasion à saisir sur Bor- 
deaux, livré clés en mains, 
point de vente micro agréé 
AMSTRAD, ATARI, C0M- 



CJV. actuel minimum : 
300000 F/mois. 
Pour tout renseignement 
Tél. 56.91.15.81 



Rentabilisez votre 61 28 (*) 

&PCW 8256/8512 

GESTION DE FICHIERS 

(*) avec le Basic Mallard 

voir CPC N° 17 page 60 
Exploitation de Fichier 

à accès direct 

— Edition sélective, recherche 
multicritère, Mailing, + de 900 
Fiches de 1 rubriques 1 20 F 

— Gestion écriture bancaire 1 80 F 

— Gestion de BIBLIOTHEQUE 1 80 F 

(Prix port compris) 

Cherche REVENDEURS 
M. Roger DESFOURNAUX 

31 , rue du Couvent - 84300 CAVAILL0N 
Tél. 90 76 13 49 

Rens. + catalogue contre 2 timbres 
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:aract ot 

' p ' : 

' e ' : 

' a ' : 

' h ' : 
el se 



wri tel ri ( ' pri nt emps ' ) :; 

wr i tel n ( ' et e ' ) ; 

wri tel n ( ' aul omne ' ) ; 

wr i tel n ( ' h i ver ' ) 

wri tel ri ('pas de saison commençant par cette lettre') 



e 1 1 d 

o 




Listing 3 



i r og r a m p r a g r a m 3 (in p u t , o u t p u t ) 






r onst cmi n = tl ; 1 23; 
cmax = #127; 



var 



car 



char 



begi n 

write ('entrer un caractère : 
readl n (car ) ; 
case car o-f 

' a ' , ' e ' , ' i ' , ' o ' , ' u ' , ' y ' 
1 , Z , 3 , 4 , ,.i , 

- h ' , ' 7 ' , ' e ' , ' 9 

- '..'/' 

#58 . . #64 
#*5B . . #*60 
cmi n . . cmax 



(j 



) ; 




wri tel n (ct\r, ' est une voyelle ') ; 



wri tel n (car , 

wri tel n ( car , 

wri tel n (car , 

wr i tel n ( car , 

wr i tel n ( car , 



est 


un 


chiffre 


) 


est 


un 


symbol e 


) 


est 


un 


symbol e 


) 


est 


un 


symbol e 


) 


e s t 


un 


symbol e 


) 



el se 



en cl 
e n d . O 




writeln (car, ' est une consonne') 



Listing 4 




progr am progr am4 ( i nput , output ) ; 



caract 



char ; 




begi n 

write ( 'entrer un caractère :: ' ) ; 
r e a d i n ( c a r a c t ) ; 
( : a s e c a r a c t o t 

' ' . . ' 9 ' : begi n 

writeln ('ce caractère est un chi-f-fre'); 
wr i t e I. n ( ' c e c h i f f r e est : ' , c ar acr t ) 
end 
et se begin 

writeln ('ce caractère n ' ' est pas un nombre'); 
writeln ('ce c a r a c t e? r e e s t : ' , c a r a c t ) 
end 
end 
end -O 
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GESTION 
FICHIERS 



Ça y est ! Depuis le temps qu'on l'atten- 
dait, il est enfin arrivé. Qui ?... Le nou- 
veau gestionnaire de fichiers d'adresses. 
Au feu les répertoires qui se cachent tou- 
jours au fond des tiroirs... Avec cet utili- 
taire, plus besoin de se lécher le doigt 
pour tourner les pages d'un carnet, non ! 
Maintenant, installez-vous devant votre 
micro, chargez votre disquette "PRGM" 
et après le traditionnel RUN, vous verrez 
apparaître le nom du fichier à créer. Ainsi 
vous pourrez, sans problème, répertorier 
vos amis, les adresses utiles et consti- 
tuer à usage professionnel, des listes 
clients, fournisseurs, sous-traitants etc.. 
Vous disposerez à cet effet d'un format 
standard. 

De toute façon, il n'est nul besoin de tou- 
cher à sa structure car elle conviendra, 
je pense, à tous les utilisateurs. En effet, 
pour chaque enregistrement, existent 
plusieurs rubriques. Le nom, le prénom, 
l'adresse (rue, avenue), le numéro, la 
ville, le code postal, le numéro de télé- 
phone et d'éventuelles remarques. Pour 
autant de détails, vous auriez dû utiliser 
une page entière de carnet. 

Etes-vous prêts à remplir votre première 
fiche ? C'est parti ! 

Tout d'abord, vous allez choisir dans le 
premier menu, l'option n° 2 qui vous 
permettra de saisir des données. Atten- 
tion, il est indispensable de saisir un nom 
dans la première rubrique, sans quoi le 
curseur restera immobile et vous ne 
pourrez compléter le reste de la fiche. Les 
autres rubriques ne sont pas obligatoire- 
ment remplies mais sachez que pour une 
recherche multicritères, il vous faudra par 



DE 



R. DESFOURNEAUX 

la suite, au moins deux rubriques com- 
plétées. En effet, si vous désirez, par 
exemple, sélectionner tous vos amis 
domiciliés dans votre département et 
possédant un micro-ordinateur, vous 
n'aurez pas besoin de visualiser toutes 
les fiches du fichier AMIS car, grâce à 
cette option multicritères, seules seront 
recherchées les fiches correspondantes. 
Résultat : un gain de temps considéra- 
ble et la certitude "de n'oublier 
personne"... 

Votre première fiche est remplie ? Alors 
continuez, vous voyez c'est un jeu d'en- 
fant. Ah! vous avez fait une erreur lors 
de la saisie du nom et vous êtes déjà à 
la rubrique "code postal" ? Alors, reve- 
nez au menu principal en frappant simul- 
tanément les touches "contrôle" et 
"Q". Reprenez l'option 2 et répondez oui 
à la question qui apparaîtra puis donnez 
le numéro de la fiche à modifier. 
Ah ! je vois que cet utilitaire vous a con- 
vaincu d'abandonner vos vieux carnets... 
Tant mieux. 

Mais j'y pense, je ne vous ai même pas 
dit que vous pouviez imprimer les fiches 
que vous désirez. Ce logiciel, vous l'avez 
compris, peut s'adapter à toutes vos exi- 
gences, que vous soyez débutant ou 
non. Lors de l'utilisation, vous serez 
peut-être un peu surpris de la présence 
de la rubrique "mise à jour et tri". Il 
s'agit, en fait, d'une option de tri par 
ordre alphabétique à l'intérieur du fichier 
et d'une simple mise à jour du compteur. 
Dorénavant, vous ne serez plus pardon- 
nable si vous avez égaré l'adresse de l'un 
de vos amis... Vous aurez simplement 
mis un peu de mauvaise volonté... 



SUPERMAA 

(Eutersoft) 



Sous ce titre quelque peu sibyllin, se 
cache un logiciel d'aide à l'apprentissage 
des échecs. J'ai bien dit apprentissage. 
En effet, le programme ne vous propose 
pas un affrontement homme-machine, 
mais une série d'exercices destinés à 
faire de vous les futurs champions dont 
la France a tant besoin. Après une page 
de présentation, on vous demande si 



vous possédez un moniteur couleur ou 
monochrome, puis si vous désirez récu- 
pérer la version originale du programme 
(en effet, il est possible de la sauvegar- 
der). Le menu présente 10 choix. Les 
points ELO dont il est question dans la 
première option sont les références du 
niveau des joueurs. On vous apprend 
aussi qu'un débutant possède d'office un 



ELO de 1200 et que le champion du 
monde dépasse 2700. Le but du pro- 
gramme est de vous faire atteindre des 
sommets dans l'art échiquéen. 
La série d'option suivante concerne dif- 
férentes parties du jeu ; les titres étant 
d'ailleurs éloquents : astuces dans l'ou- 
verture, centre et percées, attaque sur 
le roque, renforcement et défense, 7" 
rangée et pion passé, fins de parties. 
Chaque exercice vous donne une suite 
de mouvement sous forme symbolique : 
1d4, Cf6, 2c4, C5, 3d5 ! 
L'ordinateur vous donne ensuite le choix 
entre 3 réponses : A, B ou C. Selon votre 
réponse, le programme signalera vos 
éventuelles erreurs avec une explication 
sur la marche à suivre. Mais peut être 
que tous ces symboles vous semblent un 
peu abscons. Qu'à cela ne tienne, l'op- 
tion "J" vous offre une liste de vocabu- 
laire technique : ZUGZWANG ne sera 
plus un mot exotique, mais un terme des 
plus courants. . 

Une fois complètement imprégné de 
l'univers de l'échiquier, il vous reste à 
reprendre des parties célèbres et à tes- 
ter vos "réflexes". Deux catégories de 
questions existent : avec ou sans échi- 
quier... Les parties avec échiquier se font 
au coup par coup. Les ouvertures se 
déroulent automatiquement. Puis'votre 
tour arrive. Notez bien qu'il est préféra- 
ble d'avoir un échiquier réel à côté de soi 
afin d'effectuer les déplacements. A cha- 
que arrêt du programme, il faut imaginer 
la réponse possible. (N'oublions pas qu'il 
s'agit de parties entre joueurs de haut 
niveau). En appuyant sur " — " la solu- 
tion apparaît, il ne vous reste plus qu'à 
vous attribuer une note : si la réponse 
est mauvaise, 1 si le coup est moyen et 
2 en cas de franche similitude entre, votre 
échiquier et celui présenté sur votre 
écran. 

Ces quelques tests effectués, vous pou- 
vez retourner au menu et contempler la 
progression de votre score. Si rîen ne 
s'améliore, retournez vers les exercices 
et entraînez-vous intensément. 
Quelques critiques négatives, mainte- 
nant, la présentation n'est pas d'une très 
haute qualité et les débutants auraient 
peut-être souhaité avoir un peu plus de 
graphisme afin d'égayer ce programme. 
Mais nous sommes dans l'univers "spor- 
tif" des échecs et il est vrai que la fan- 
taisie doit céder le pas devant l'analyse. 
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CLASH 

ERE INFORMATIQUE 
Aventure 

La naissance d'une nouvelle gamme 
de logiciels est toujours attendue 
avec impatience ; aujourd'hui, c'est 
le tour d'Ere Informatique avec 
Clash qui démarre la gamme Métal 
Hurlant issue de la célèbre revue 
du même nom. 

Situons rapidement le contexte de 
l'action : vous êtes Manuel, petit 
trafiquant de mobs ; vous êtes 
fraîchement sorti de l'ombre et 



rentrez tout content chez votre 
chère petite mère qui vous a 
sûrement mitonné un véritable petit 
festin pour l'occasion... 
Malheureusement pour vous, il n'y 
aura pas de fête ou alors cela va 
être la vôtre, car vous découvrez 
votre mère assassinée et, qui plus 
est, la concierge vous trouve avec 
l'arme du crime dans la main et 
elle appelle immédiatement la 
police. 




Avec la farouche énergie qui anime 
chaque innocent, il ne vous reste 
plus qu'à reprendre contact avec 
vos anciennes connaissances peu 
recommandables afin d'essayer de 
trouver le ou la coupable de ce 
crime odieux que l'on va essayer 
de vous coller sur le dos. Mais 
avant de commencer votre 
enquête, sachez bien qu'il va falloir 




être psychologue et tirer les vers 
du nez à vos "copains" sans qu'ils 
s'en aperçoivent. 

Après une belle page écran doublée 
d'une agréable musique, vous 
entrez dans le feu de l'action avec 
un écran partagé en quatre parties 
principales : la fenêtre présentant 
le lieu où vous vous trouvez, celle 
où apparaissent les personnages, 
celle où vous pouvez dialoguer et, 



pour terminer, la fenêtre où vous 
pouvez sélectionner une icône pour 
agir (examen, dialogue, fuite...). La 
réalisation de ce logiciel est 
soignée avec un graphisme net qui 
a peut- être le désavantage de ne 
pas occuper une place plus 
importante... Somme toute, une 
gamme qui démarre bien et qui 
vous permettra de passer quelques 
bonnes heures. 



MASK 

GREMUN GRAPHICS 
ArcadelAventure 

Il est un problème qui existe 
depuis la nuit des temps et que 
personne n'est encore parvenu i 
résoudre : il s'agit du perpétuel 
affrontement entre le Bien et le 
Mal. Seulement, si vous vous 
engagez dans les forces de Mask, 
vous pourrez combattre les 
redoutables Venoms qui n'ont 
qu'un seuF but : abominer le 
monde. 

Avant d'atteindre la base des 
Venoms que vous devez détruire 
totalement, vous avez trois 
endroits à "visiter" afin de sauver 
cinq autres agents. Pour arriver à 
vos fins, vous devez commencer 
par localiser et activer le scanner 
qui vous indiquera l'endroit où se 
trouve l'agent à libérer. Pour cela, 
il faut ramasser les morceaux 
permettant de reconstituer la clé 
de sécurité.. Ensuite, l'agent étant 
libéré, vous devez ramasser son 
masque... Bien entendu, quel que 
soit l'endroit visité, il y a toujours 
des ennemis dévastateurs de tous 
bords qui prennent un malin plaisir 
à détériorer votre vaisseau ; aussi, 



vous serez bien heureux de trouver 
des trousses à outils qui vous 
permettront de poursuivre votre 
mission... 

Le nouveau jeu d'arcade-aventure 
vous captivera une fois que vous 
aurez découvert toutes les options 
de Mask ; le graphisme n'est pas 
particulièrement génial, mais 
l'animation traduit un phénomène 
d'inertie sur votre vaisseau qui 
apporte une difficulté 
supplémentaire... Ah, un dernier 
détail : votre mission est 
chronométrée alors pas de temps à 
perdre ! 









EXOLON 

HEWSON 
Arcade 



Depuis des jours et des jours que 
votre voyage a commencé (je ne 
dirais pas des lunes puisqu'il ii'y 
en a pas dans le système où vous 
évoluez I), vous désespérez de 
pouvoir poser votre astronef 
quand, soudain, vous apercevez la 
fin du voyage... 
Seulement, dès que vous pointez le 



bout de votre nez, les tirs 
commencent instantanément et 
c'est l'angoisse car vous avez beau 
posséder neuf vies, c'est loin 
d'être l'immortalité I Alors, vous 
avez le choix entre deux modes de 
ripostes : le pistolet ou les 
grenades, ces dernières ayant 
l'avantage de traverser également 
les murs épais ou les parois 
rocheuses... Malgré tout, si les 
ennemis s'avèrent nombreux, 
puissants et indestructibles, alors 
n'hésitez pas à utiliser votre 
armure hyper blindée : 
l'exoskeleton qui est manœuvré de 
manière hydraulique et qui vous 
assure protection contre presque 
tout (excepté les canons les plus 
puissants). 

Exolon peut être qualifié de jeu 
d'arcade classique présentant les 
caractéristiques suivantes : bon 
graphisme constituant des écrans 
très colorés avec une animation 
correcte quoique pas très rapide. 
La progression s'effectue de 
manière linéaire et vous avez la 
possibilité de faire le plein 
d'énergie et de grenades en chemin 
(ce qui n'est pas négligeable). Pour 
terminer, citons un avantage de ce 
logiciel : la possibilité d'avoir accès 
à une multitude d'écrans... 
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WONDER BOY 

ACTIVISION 
Arcade 

Une nouvelle fois, voici une 
adaptation de jeu de café ; les 
résultats obtenus ne sont pas 
toujours des plus réussis et nous 
en avons ici un exemple. 
Wonder Boy est un Tarzan haut 
comme trois pommes, qui possède 
un courage sans limite pour se 
porter au secours de sa belle. Car 
figurez-vous que la pauve Tina 
s'est fait enlever par le plus 
malfaisant des personnages de la 
jungle, qui fait régner la terreur 
sur tous les habitants ! 
Notre Tarzan, tout blond, 
commence sa dure mission en 
pleine forêt et rencontre un œuf 
lami ou ennemi?) ; heureusement 
pour lui, tous ces œufs vont 
l'équiper de différents objets : 
skate board, hache ou même ange 
gardien. Il en aura bien besoin car 
tout lui est hostile et mortel par 
simple contact : blocs de pierre, 
abeilles, escargots ou serpents... 







Seulement, Wonder Boy est comme 
tout un chacun : ne pouvant se 
satisfaire d'amour et d'eau fraîche 
pour conserver sa vitalité, il devra 
attraper les fruits qui apparaissent 
de temps à autre... 
Bien que ce jeu ne manque pas 
d'intérêt, vous serez sans aucun 
doute déçu par le choix des 
couleurs qui sont un peu ternes ; 
le scrolling, quant à lui, s'avère 
être un peu saccadé mais il faut 
noter que le graphisme est plus 
que correct et que vous avez 112 
décors différents à votre 
disposition... 
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LES DIEUX 
DE LA MER 

INFOGRAMES 
Arcade/Simulation 



Alors que le championnat du 
monde de ski nautique s'est 
déroulé du 17 au 20 septembre à 
Londres, Infogrames a devancé 
cette manifestation de quelques 
skis en nous proposant cette 
simulation qui mérite fortement 
que nous y jetions un coup d'œil. 
Comme tout bon championnat qui 
se respecte, vous devez accomplir 



les trois épreuves imposées 
suivantes : le saut, les figures et 
le slalom pour terminer en 
apothéose... 

Pleinement concentré, vous vous 
présentez pour la première 
épreuve ; un petit coup de joystick 
à droite et vous vous retrouvez sur 
le tremplin... Le plus dur sera de 
rester équilibré en l'air pour ne pas 
prendre une tasse mémorable à 
l'arrivée ! 

Ayant effectué vos trois essais 
pour l'épreuve du saut, vous vous 
engagez dans celle des figures : 
pour commencer en douceur, vous 
vous permettez un petit dérapage 





puis vous osez un demi-tour, un 
tour complet et enfin un 540° 
STEP, c'est-à-dire, un tour et demi 
avec une jambe passée au-dessus 
de la corde de traction pendant la 
rotation (magnifique !) 
Vous terminez votre championnat 
par le slalom où il n'y a que 6 
bouées à passer peut-être, mais le 
parcours s'effectue très, très 
rapidement ! 

Vous serez enchanté par ce logiciel 
qui a l'avantage d'allier qualités 
graphiques et d'animation à une 
présentation attrayante; alors, un 
conseil, n'ayez pas peur de vous 
mouiller ! 



ULTRON 

CHIP 
Arcade 



La comète de Halley, vous vous en 
souvenez ? Elle avait déjà fait 
parler d'elle en 1985 et 
aujourd'hui, cela recommence, mais 
en pire I... En effet, en cette 
année 2062, la Terre récupère de 
l'énergie en captant les vents 



Etant chargé de guider le robot 
dans la base, vous découvrez une 
grande difficulté : le déplacement 
du robot se fait comme s'il était 
une toupie (contrôle délicat) et la 
moindre erreur se solde par une 
formidable explosion. De plus, la 
base présente des passages étroits 
et semés d'embûches, le tout sur 
fond de losanges. 
Les premiers essais de ce logiciel 



vous mèneront sans doute à la 
conclusion : ce n'est pas jouable ! 
En effet, étant donné la difficulté 
que l'on rencontre pour contrôler le 
robot, la fin du jeu est toujours 
très rapide. Malgré tout, avec un 
peu d'entraînement, vous pourrez 
progresser sur cette base 
fortement géométrique et un peu 
austère, car la persévérance paie 
toujours. 






solaires à partir d'une base 
spetiale. Seulement, le 
fonctionnement de cette base a 
été perturbé par le passage de la 
comète de Halley. 
La base risquant d'exploser à tout 
instant, un robot télécommandé est 
envoyé là-bas afin de récupérer 
trois cyclotrons désactivateurs. 
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CHARLY DIAMS 

LORICIELS 
Arcade /Aventure 

Le temps n'étant plus à la ruée 
vers l'or depuis fort longtemps, 
Charly a décidé de partir à la 
conquête des mille diamants bleus 
pouvant lui garantir une retraite 
immédiate et plus que 
confortable... 

Seulement, la cachette où se 
trouve cette petite fortune est loin 
d'itre accessible et il va falloir 
énormément voyager. De plus, 
l'acheminement vers la richesse se 
fait par étapes, car il faut réunir 
sept fleurs et pas n'importe 
lesquelles piisqu'il s'agit de fleurs 
miracles I... 





C'est ainsi que Charly commence 
son périple en plongeant dans le 
Golfe du Bengale (attention, il ne 
faut pas oublier de se mettre en 
tenue de bain I...). Avec de pareils 
décors aquatiques c'est bien le 
diable s'il ne réussit pas à trouver 
une fleur! Ensuite, commence la 
longue, pénible et très éprouvante 
traversée du désert du Ténéré où 
il faut échapper au redoutable 
Ayatollah... 



Mais il reçoit une belle récompense 
au bout de cette terrible épreuve 
en la personne de Roubia, porteuse 
d'eau qui lui permet d'obtenir 
quatre fleurs en une seule fois !.. 
Bref, avec ce tout dernier jeu 
d'arcadelaventure de Loriciels, vous 
allez en voir de toutes les 
couleurs.... Avec un graphisme 
soigné, haut en couleurs, 
présentant des paysages très 
divers (mais attention, nous 
restons toujours dans le style 
arcade). La musique, quant à elle, 
présente, par moments, quelques 
réminiscences de Zox 2099. 



CANADAIR 

FIL 
Arcade 



Ce logiciel fait référence à un 
problème qui, malheureusement, se 
posa cruellement tous les étés : ce 
sont les incendies de foret... 
Canadair vous proposa de prendre 



place è bord d'un de ces avions et 
de vous transformer an "pompier 
volant" sans peur et sans reproche 
afin de repérer et d'aller 
héroïquement éteindre tous les 
feux. 

Après avoir pris suffisamment de 
vitesse et décollé sans encombre, 
vous repérez votre premier lieu de 
mission en le localisant sur la 
carte ; ensuite, après chaque 



incendie éteint, vous devez vérifier 
le niveau de vos réservoirs d'eau 
et aller les remplir la cas échéant. 
Le but du jeu sera d'éteindre le 
maximum d'incendies en un 
minimum de temps, tout en étant 
un virtuose du manche car l'espace 
aérien n'est plus ce qu'il était : il 
règne un de ces trafics... I 




A première vue, le sujet semble 
intéressant, mais il y a de grandes 
chances pour que vous soyez un 
peu déçu par la graphisme du jeu ; 
par contre, la page de présentation 
accompagnée d'une synthèse 
vocale est bien réussie... Un autre 
petit détail : si vous avez une 
impression de déjà vu, ne vous 
posez pas la question de savoir où 
vous avez des prémonitions car en 
cherchent bien, vous trouverez 
certainement son frère jumeau (ou 
presque I). 



WIZBALL 

OCEANIUS GOLD 
Arcade 

Osez pénétrer dans un monde tel 
que celui de Wiz et vous 
comprendrez enfin ce que peut 
être un univers sans couleur : tout 
simplement un contexte gris, terne, 
triste et sans saveur.. 
Vous n'allez certainement pas 
laisser Wiz dans cet état ! C'est 
pourquoi vous sautez dans votre 
transporteur avec votre inséparable 
chat Catelite et foncez à la 
recherche des gouttelettes bleues, 
rouges ou vertes indispensables à 
la restitution des couleurs. 
Malheureusement, vous vous 
rendez vite compte qu'avec votre 
apparence toute ronde, vous avez 
du mal è vous contrôler. Mais il 
suffit de percer le secret de 
certaines des créatures étrangères 
qui peuplent l'univers de Wiz, pour 
gagner quelques propriétés... 




U U *J 



En effet, lorsque certains ennemis 
sont tués, ils déposent une perle 
verte qu'il vous suffit de ramasser 
pour avoir accès è des icônes qui 
vous permettront d'obtenir un 
meilleur contrôle de vous-même... 
C'est par ces mêmes icônes que 
Catelite pourra vous rejoindre pour 
aller ramasser les gouttelettes de 
couleur. 

Wizball est un logiciel qui a 
l'avantage d'être original, attrayant 
et bien réalisé. Par contre, avant 
que vous ne perdiez patience, je 
vous donne un truc pour 
sélectionner une icône : Wizball 
effectuant un mouvement vertical, 
vous devez faire subir è votre 
joystick un mouvement latéral très 
rapide... 
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INDOOR SPORTS 

DATABYTEIUBI SOFT 
Simulation 

Pour tous ceux qui ne sont pas de 
fervents adeptes de sports en plein 
air, pour cause de vent, pluie etc., 
nous leur proposons de s'exercer à 
des sports en salle, quatre pour 
être précis et, qui plus est, en 
étant confortablement installés 
dans leur fauteuil devant leur CPC. 
Après avoir entré tous les noms 
des joueurs (vous pouvez jouer à 4 



en sachant que vous ne serez que 
2 joueurs à la fois), vous pouvez 
commencer par une partie de 
bowling, pour vous mettre en 
condition... Bien que la réalisation 
soit correcte, vous serez peut-être 
gêné par le fait qu'un lancer de 
boule se fait sur deux écrans : un 








pour le départ et un pour visualiser 
les quilles... 

Ce système de deux écrans se 
retrouve également pour le jeu de 
fléchettes : un gros plan sur la 
cible pour orienter votre tir et une 
vue globale de toute la pièce pour 
voir le résultat final. 
Lorsque vous sélectionnez le 



troisième sport, vous prenez un 
coup de frais car il s'agit de 
"hockey aérien" où il vous faudra 
faire preuve d'énormément de 
réflexes et d'habileté car c'est 
vraiment très, très rapide !.. 
Non contents d'avoir pu se 
défouler de façon agréable sur ces 
trois jeux, les Amstradistes ont 
l'honneur et l'avantage de pouvoir 
faire une partie de ping-pong en 
prime, classique mais toujours 
agréable è retrouver... Somme 
toute, un logiciel qui vous 
procurera plaisir et variété. 







ROAD RUNNER 

US GOLD 
Arcade 

Depuis le temps que nous 
attendions la version sur 
AMSTRAD d'un des plus célèbres 



dessins animés !... Road Runer 
nous est enfin parvenu et c'est 
avec une grande fébrilité que j'ôte 
le film plastique protégeant la 
disquette. 

Je prends aussitôt un départ 
fulgurant et laisse sur place cet 
imbécile de coyote... En pleine 
ligne droite j'aperçois un immense 
tas de graines que j'avale en 
passant ; pendant ce temps, le 
coyote a déniché (je ne sais où). 



une planche è roulettes et il se 
rapproche, se rapproche 
dangereusement... Mais, comme 
d'habitude, je serai le plus fort. 



Lorsque vous découvrirez ROAD 
RUNNER, vous serez peut-être 
déçu par la qualité du graphisme 



(surtout si vous en avez déjè vu 
d'autres versions...). Par ailleurs, 
vous remarquerez très rapidement 
que le jeu se décompose de 
manière alternative de parcours 
rectilignes très faciles et de 
parcours parfois difficilement 
franchissables. Par contre, pour ce 
qui est de l'animation, vous serez 
pleinement satisfait par le degré 
de vélocité que peut atteindre ce 
cher Beep-Beep I... 




Catalogue 

f' impression de catalogue de disquettes 
n'est pas très complexe et nous avons déjà publié 
(CPC 14) un utilitaire qui faisait ça très bien. Voici, 
cependant, un petit programme qui vous donne le choix 
entre une impression sur une, deux ou quatre colonnes et 
vient donc apporter un "plus" à ce programme. 



10 
20 
30 
40 
50 
40 
70 
HO 
90 
100 

uo 

120 

1 30 
140 



CLS ! LOAD " PRTCAT . B I N 

CALL &A000 

CLS: LOCATE 10, Si PRINT" IMPRESSION DU CATALOGUE 

LOCATE 10,7:PRINT" en 1 , 2 ou 4 colonnes " 

INTRODUIRE LA DISQUETTE " 
ET FAITES VOTRE CHOIX " 

1- sur une colonne" 

2- sur deux colonnes" 

3- sur quatre colonnes" 



LOCATE 10,12:PRINT" 

LOCATE 10,13:PRINT" 

LOCATE 10,17:PRINT" 

LOCATE 10,18sPRINT" 

LOCATE 10,19!PRINT" 

LOCATE 10,24:PRINT"V0TRE CHOIX: 

a*=INKEY*iIF a*="" GOTO 110 

IF a*="l" THEN PRTCAT, O 

IF al» "2" THEN PTRCAT , 1 

IF a*="3" THEN PRTCAT, 2 



Nous sommes certains que le retour de vacances 
provoque un tas de bonnes résolutions, dont celle, 
capitale, de remettre bon ordre au fouillis de disquettes 
non cataloguées que vous avez laissées en plan pour 
satisfaire votre appétit de soleil. Ce petit programme, que 
vous devez à Maurice Tollu, de Besançon, vous rendra 
donc les meilleurs services. 



BOITE A OUTILS PC 



Un outil, forgé entièrement à la main et dans les meilleurs 
aciers, par J.P Caron. Les explications sont dans le 
programme. 



1 KEY 4,"SAVE"+CHR*(34)-i-"b!MAJUS"+CHR*<34)-t",a" 

2 REM certains BASIC disposent d'une fonction UPFER*, ou UCASE*, 

,mais ils oublient les caractères accentués du clavier 

AZERTY. 

Un GOSUB 51000 réglera le problème. 

Si, dans votre programme, vous avez, par exemple, 

INPUT"te>:te à mettre en ma juscul es" ; TXT* , 

vous pouvez ajouter la ligne: 

numéro* 1 A*=TEXT*: GOSUB 51O00: TXT*=A* 

Mais il est plus économique de corriger la ligne ainsi: 

INPUT"texte a transformer ";A*:G0SUB 51 000: TXT*=A* 

L'instruction UPPER* est donc à remplacer par: 

A*=TXT*: GOSUB 51000: TXT*=A* 
20 REM Pour convertir en minuscules : GOSUB 52000 
30 PRI NT "Démonstration de mise en MAJUSCULES" 
35 LPRINT CHK*(27> ; "9":CHR*(27) ; "x";CHR*(l> 
40 LPRINT"Démonstration de mise en MAJUSCULES" 

50 A*="abcdef . . . àâéëêèaaç i iîooSuiiùaxyz ABC12345" : PRINT A*;LPRINT A* 
40 PRINT"devientl " lLPRINT"devi ent " 
70 GOSUB 51000 
80 PRINT A*>LPRINT A» 



90 PRÎ NT "Combien de temps .faut-il pour traite 



248 



100 
103 

110 
115 

?" 
120 
130 
140 
150 

TA* 
140 
170 
180 
190 

?" 
200 
203 
210 
220 



T0*=TIME*:TXT*=STRIN6*(24S,"ii") : 

T1*=TI ME*: A*=TXT*: GOSUB 51000: TXT*=A* 

T2*=TIME*: PRINT T0*,T1*,T2* 

LPRINT"Combien de temps faut-il pour traiter 248 

":T2* 



(le pi r 



(le pire cas) 



LPRINT"Heure de début : " : TO*., "et à la fin: 
PRINT"Démonstrat i on de mise en minuscules" 
LPR|NT"Démonstrat i on de mise en minuscules" 
A*="?; : /AZERTYZSéeeéaàçi lîooôuuûù xyz AEI0U1 2345" : PRI NTA*: LPRIN ■ 

PRI NT "devient: ": LPRINT "devient " 

GOSUB 52000 

PRINT A*:LPRINT A* 

PRINT"Combien de temps faut-il pour traite 



248 Z (le pire cas) 



T0*=TIME*;TXT*=STRING*(24B,"Z"> 

T 1*=TI ME*: A*=TXT«: GOSUB 52000: TXT*=A* 

T?*=T.IME*:PRINT T0*,T1*,T2* 

LFRI NT "Combien de temps faut-il pour traiter 248 Z (le pire cas) 



Pierre TACONNET 



230 
51000 
51010 
32) 
51020 
51030 
les 
51040 
51041 
51042 
51050 
51040 
51O70 
51080 
51090 
52000 
520 1 



LPRINT"Heure de début : " s TO*, "et a la fin:";T2* 

FOR N=l TO LENIA») : 0=ASC (MID* (A* ,N, 1 ) ) : 'mise en MAJUSCULES 

IF Q<97 OR Q>122 AND 0<128 THEN 51090 ELSE MID* (A* ,N, 1 ) =CHR* (0- 



IF 0>130 AND a< 135 OR 0=140 THEN MID* (A* ,N , 1 > ="A" 
IF 0=145 THEN MID* (A* , N , 1 ) =CHR* ( 144) : ' A, E dans l'A 



et minuscu- 



IF 0=135 THEN MID* < A* ,N, 1 ) =CHR* ( 128) : ç et majuscule 
REM Cette ligne peut Être remplacée par 

IF 0=135 THEN MID* (A* ,N, 1 ) = "C" : ' C et ç 
IF Q>135 AND Q<139 OR 0=130 THEN MID* < A* ,N, 1 ) ="E" 
IF 05138 AND 0<142 OR 0=141 THEN MID* (A* ,N, 1 ) =" I " 
IF Q>144 AND GK150 OR E=142 THEN MID* ( A* ,N , 1 ) ="0" 
IF 0=129 OR Q=150 OR Q=151 OR 0=143 THEN MID* ( A* ,N, 1 ) ="U" 
NEXT NiRETURN: 'Le français n'accentue pas le Y 
FOR N=l TO LEN(At) : 0=ASC (MID* <A*,N, 1) ) : mise en minuscules 
IF 0>64 AND Q<91 THEN MID* < A* ,N, 1 > =CHR* (Q+32) 



J.P. Caron, qui travaille sur PC 1512 AMSTARD gonflé à 
640Ko + FD3 + Business card TANDON, a ajouté cette 
routine au listing n° 6 de Michel Archambault, page 49 
de PCompatibles n° 3 



INTERVALLES 2 



Dans CPC. 23 figurait un programme de calcul 
d'intervalles entre dates auquel il est bon 
d'apporter quelques précisions. Tout d'abord, c'est 
fncj qu'il faut lire dans le REM de la ligne 30. Ensuite, 
c'est par la différence entre les deux codes du jour 
(toujours FNcj) que l'on obtiendra le nombre de jours 
entre les deux dates. Maintenant, cela devrait 
fonctionner. 



FACTORI elles 



La rentrée des classes, le nouveau prof de maths... Bref, 
la routine qui reprend. Utilisons donc notre cher CPC pour 
nous dégager des tâches rébarbatives. Frédéric Herrade, 
de Roquemaure (que cette ville fleure bon les vacances I) 
vous offre ce petit programme. 



10 MODE 1 i B= 1 

20 INPUT"FACTORIELLE DE OUEL NOMBRE ', 
30 N=VAL.(N*) 

40 IF N<0 OR (N-INT(N)JOO THEN RUN 
50 PRINT"La factorielle de ";Nj" est 
40 FOR X=l TO N 
70 6"B«X 
30 NEXT X 
90 PRINT B 
100 END 



Vous aviez peut-être oublié que N doit être un entier 
positif (les vacances !), la ligne 40 vous le rappelle. 
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TRUCS ET ASTUCES 



MAITRISEZ 
VOS IMPRESSIONS 

Nous sommes les autours du programme 

"Impression", distribua par ESAT Software et 

nous aimerions faire profiter les lecteurs de 

CPC de quelques trucs leur permettant de tirer 

le meilleur parti de ce logiciel. 



Profitant de notre expérience dans le 
domaine de l'impression, il nous apparaît 
comme judicieux de configurer votre 
imprimante comme suit, à l'aide des 
sélecteurs DIP : 

— Zéro barré 

— Jeu de caractères USA 

— Bip actif 

— Papier 1 1 ou 1 2 pouces (selon votre 
papier). 

(référez-vous au manuel de votre 
imprimante...) 

L'initialisation de votre imprimante peut 
se faire sans couper l'alimentation de 
celle-ci à l'aide de la fonction RSX; I INIT 
(en mode, direct ou en mode 
programme). Ceci peut s'avérer très utile 
dans un programme BASIC pour annuler 
les effets d'une séquence préalablement 
envoyée sur l'imprimante. Le gain de 
place est surtout appréciable lorsque 
vous avez plusieurs commandes à 
annuler. Après l'initialisation, la 
configuration de l'imprimante est 
imposée par le positionnement des 
sélecteurs DIP. 

Avant toute impression, vérifier que la 
longueur des pages est bien la même que 
celle sélectionnée par les DIPs (très 
important pour les sauts de page), sinon 
utiliser la commande I LONGPAGP,p où 
p représente la longueur d'une page en 
Pouces. 

La commande I PAGSUIV vous 
permettra de passer automatiquement à 
la page suivante. 

Lors d'une séparation volontaire ou 
.accidentelle de vos pages de listing, 
certaines lignes imprimées sur les 
perforations du papier se trouvent 
détruites. La commande I PERFO,n (n 
représente le nombre de lignes à sauter) 
effectuera un saut de n lignes en bas de 
page. Une solution que nous considérons 
comme très bonne est n = 5. 

Si vous avez déjà été accusé de .-page 
nocturne à cause de votre imprimante, 
voici une solution qui diminuera 
sensiblement le niveau sonore de celle- 
ci. Utilisez pour cela les commandes 
I UNID et I DEMIV. 



Il est parfois utile de pouvoir lire se qui 
se trouve momentanément caché par le 
ruban de votre imprimante, ceci est 
possible grâce à une commande que 
vous n'avez peut-être jamais utilisée et 
qui se nomme I INC. 
Vous serez surpris du résultat ! 

Pour les tilisateurs de TURBO PASCAL 
(vous Ci.es de plus en plus nombreux), 
avant tout listing, sélectionnez le jeu de 
caractères USA et le mode condensé : 
I CARACT,0: I COND 
Vos listings garderont ainsi leur 
présentation initiale (longueur des lignes 
respectée, crochets et accolades...) 

Pour obtenir une représentation fidèle de 
vos listings BASIC, il existe deux solution 
selon le type de clavier dont vous 
disposez ; si vous possédez un clavier 
AZERTY (français), il vous faudra 
sélectionner le jeu de caractères français 
(ICARACT,1) par contre, si vous 
possédez un clavier QWERTY (USA), il 
vous faudra sélectionner le jeu de 
caractères USA (I CARACT,0) 

Pour les traitements de textes et pour 
avoir une écriture se rapprochant le plus 
de la qualité courrier, il vous faudra 
utiliser la séquence suivante : 
I CARACT,1: I NLQ: I PROP 

Economisez environ un tiers de papier en 
faisant imprimer vos listings grâce à la 
séquence d'instruction suivante : 
I COND: I IND: I ALIMO: I PERF0.3 
Ceci est très intéressant pour la 
réalisation de listings destinés à 
l'archivage. 



Remarqua : 

Une erreur s'est glissée dans la notice 
d'utilisation d'IMPRESSION, les 
instructions I ALIM1, I ALIM2, I ALIM3 
sont à remplacer par les instructions 
suivantes : I ALIMO, I ALIM1, I ALIM2. 

Pour faire des recopies d'écrans 
partielles, il peut s'avérer utile de ne pas 
tramer l'écran lorsque le morceau 
d'écran à recopier n'est composé que de 
2 ou 3 couleurs. 



Surtout n'oubliez pas d'utiliser cette 
instruction qui ne figure pas dans la 
notice I AUTEURS. 



ii« 



lil 



Au retour du message de bienvenue 

d'IMPRESSION et du Ready, tapez en 

mode direct. 

CALL &BBOO ; ceci restaure la touche 

ESCAPE et le clavier en général 

CALL &BB4E:CLS ; pour avoir la 

possibilité d'utiliser IMPRESSION avec 

des caractères redéfinis. 

MEMORY &8500 ; pour avoir un 

maximum de place disponible pour vos 

programmes. 

La disquette IMPRESSION, comme vous 
avez pu vous en apercevoir, n'est pas 
copiable avec CP/M. Toutefois, il est 
possible de réaliser des copies de 
sauvegardes, ce que nous vous 
conseillons, avec le logiciel HERCULE 
par exemple. 

La protection ne remet pas en cause la 
place disponible sur la disquette. Il est 
possible de sauver vos applicatiions sur 
la disquette IMPRESSION tant qu'il reste 
des octets de libre. 

Nous vous proposons un petit 
programme utilisant les commandes 
I MTRAME, I MCOPYTRAME, 

I COPYPART, I DOUBLECOPY, 

I COPYTEXTE, I COULEUR. 

10 MODE 1 

20 INPUT "choix du mode (0,1 ou 2) : 
",m 

30 IF m<0 or m>2 then 10 

40 INPUT "Nom de page à charger : 
",nom$ 

50 LOAD nom$, &C000 

60 I MTRAME 

70t$=INKEY$ 

80 IF t$="1" THEN I COPYPART 

90 IF t$ = "2" THEN I MCOPYTRAME 
100 IF t$="3" THEN I DOUBLECOPY 
1 1 IF t$ = "4" THEN I COULEUR 
120 IF t$="5" THEN I COPYTEXTE 
130 1F t$> = "1" AND t$<="5" 
THEN 70 
140 END. 
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E.S.fl.T. Software.. 

55-57, rue du Tondu 33000 Bordeaux. Tel : 56.96.35.23 Poste 31 V 



LE PREMIER ÉDITEUR DE LOGICIELS UTILITAIRES 



NOUVEAUTÉ 



ZENITH : La capacité de stockage des 
disquettes 3 pouces est au maximum de 
178 Ko. Il est donc difficile de stocker plus 
de 4 programmes par faces. Ce pro- 
gramme de compactage réduit les pages 
de présentation ainsi que les program- 
mes (Basic ou Binaire) en un minimum de 
place. Par exemple si vous possédez un 
fichier organisé comme suit: 

1 K 



\ ■ ■. 



ECRAN-BIN 3 K 
JEUX-8IN 10K 



Le loader-bas aura disparu et vous 
aurez gagne 47 Ko de place libre sur 
votre disquette. 

ZENITH : DISC 250 F TTC 

NOUVEAUTÉ 

L'INTERPRETE : La majorité des 
logiciels existants sont dans la langue de 
Shakespeare, et l'utilisation n'en est que 
plus difficile (Utilitaires - Jeux d'aventures 
Jeux...). Ce programme vous permet de 
traduire en français ou en toute autre 
langue vos logiciels préférés. La démar- 
che est automatique et ne requiert au- 
cune connaissance particulière. 

- Mapping du disque 

- Edition des secteurs 

- Acceptation de jokers 

- Traduit plus de 500 mots à la fois 

- Repère automatiquement sur la 
disquette les textes à traduire 

L'INTERPRETE : 
DISC : 290,00 F TTC 



NOUVEAUTÉ 

TRANSLOCK II : Un ensemble 
complet pour transférer les logiciels 
protégés par SPEEDLOCK de K7 sur 
disquettes (ancien et nouveau). Il est 
tellement bon que les Anglais nous l'ont 
pris. Distribué en Angleterre par SIRON 
SOFTWARE. 
DISC 225,00 F TTC 



NOUVEAUTE 



BOURSE 2000 

QUAND ACHETER, 
VENDRE, PRENDRE 
DES BENEFICES ? 

Bourse 2000 répond à ces questions et 
à bien d'autres encore avec des instru- 
ments empruntés aux milieux financiers 
les plus cotés (moyennes mobiles, points 
et figures, tableaux, graphiques...). 
Bourse 2000 est livré avec un fichier de 
40 valeurs et leurs cotations depuis 
1985. 

Bourse 2000 est un logiciel évolutif ; 
vous pourrez vous procurer les cotations 
de n'importe quelle valeur sur 2 années 
et plus à ESAT software (listing 20 F, 
dise 50 F). 

Bourse 2000 permet de visualiser la 
tendance d'une valeur (hausse, baisse, 
stagnation) et de situer les moments 
d'intervention (achats, ventes...). 

Clubs et associations : contactez ESAT 
software pour des tarifs préférentiels. 

BOURSE 2000 : 

- AMSTRAD CPC 6128 

seulement : 450, OO F 

- AMSTRAD PCW 8256-8512 
(disponible en août) : 750,00 F 

- Compatibles PC-XT (disponible en 
août) : 1 200,00 F 

- ATARI 520-1040 ST (disponible en 
août) : 990,00 F 



DERNIERE MINUTE 

HERCULE II 

Ensemble de six programmes sans 
concurrence. Documentation sur de- 
mande. 
DISC 395 F TTC 




IMPRESSION : Programmation 
avancée de l'imprimante - 65 comman- 
ces RFX disponibles. 
IMPRESSION : Cass : 200,00 F 
Disc : 220,00 F 

TAPE LEADER : ce logiciel duplique 
vos bandes magnétiques avec un choix 
de 10 vitesses de sauvegardes. Durant la 
duplication, les renseignements sont affi- 
chés sur l'écran. 
CASS : 1 75 F TTC 
DISC : 205 F TTC 

VIEW TEXT : CASS 135 F TTC 



ACCESS II : Réalisez l'accès direct à 
l'aide des RSX disponibles, ensemble 
direct d'utilitaire d'exploitation du dise 
livré avec le soft 
DISC 390 F TTC 



NOUVEAUTÉ 



HERACLIOS (PCW 8256 et 8512) : 
Ensemble complet de gestion du dise. 
Plan du dise. Editeur de secteur. Forma- 
teur rapide. Déprotecteur basic. Edi- 
teur de mémoire. Récupérateur de 
fichiers effacés. Modification de cata- 
logue. Lecteur rapide (secteur endom- 
magé et/ou non standard). Lecteur A 
ou B. 
DISC 350 F TTC 



Abonnements 
MEPHISTO MAGAZINE 

(Routines de transferts) 
330 F 12 N ' - Port gratuit 



Numéro 1 au hit parade des utilitaires : 
Label zeni-quahté : 
ECHOSOFT : DISC 395 F TTC 



NOTRE CATALOGUE EST DISPONIBLE CHEZ 
VOTRE REVENDEUR OU CHEZ ESAT CONTRE 20 F 
EN TIMBRES (Remboursés à fa première 
commande). 



BON DE COMMANDE 

Prévoir 25 F de port + 20 F pour le contre remboursement. 

Nom : Prénom : 

Adresse : 
I Logiciels commandés : 

I 



î 



i 



Ability 

Plus 7 




Si la vogue n'est plus guère aux logiciels 
intégrés, la faute n'en revient pas a une 
quelconque faiblesse du concept d'inté- 

3 ration, mais plutôt aux sociétés éditrices 
e logiciels qui n'ont jamais respecté le 
cahier des charges que partiellement. 
MIGENT, éditeur de ABILITY Plus, vient de 
réussir là où bien d'autres avaient, peu ou 
prou, échoué. 

L'idée de logiciel intégré est intéressante 
puisqu'elle permet aux entreprises de 
disposer d'une base de données, d'un 
tableau, d'un éditeur de texte et d'un 
grapheur et ce, en un seul logiciel. Bien 
sûr, il ne suffit pas de placer dans la 
livraison quatre logiciels de fonctions 
diverses pour obtenir un intégré. Encore 
est-il nécessaire de rendre possible 
l'échange des données entre les fichiers 
des différents programmes. C'est sur 
cette notion d'interactivité que nombre 
de logiciels achoppaient. C'est cette inte- 
ractivité qu'ont su organiser les auteurs 
de MIGENT. 

Si les avantages du procédé sont évi- 
dents - concision, cohérence, prix, for- 
mation réduite etc. - les inconvénients 
n'en sont pas moins présents et l'occu- 
pation de la mémoire par les 4 logiciels 
n'est pas le moindre. 






C.A. AU 1er TRIHESTRE 

COMPARAISON 1986 / 1987 



r 

£ 
S 



Mmsff 
















Lasagnes 



4k*»* C&qt/ï// 



û/vers 



ABILITY Plus, qui n'est pas le plus gour- 
mand, nécessite tout de même 384Ko 
de mémoire minimum. Le pourcentage 
de mémoire disponible est d'ailleurs affi- 
ché en permanence à l'écran. Toutefois, 
lorsqu'une application manque un peu 
trop de place, il est toujours possible de 
fermer un fichier inutilisé. ABILITY Plus 
réclame également un écran, une carte 
et une imprimante graphiques. Certaines 
applications ne peuvent tourner sur écran 
texte et les graphes ne sont pas obtenus 
à l'aide de caractères du jeu courant. La 
prise en compte d'un éventuel coproces- 
seur mathématique 8087 est automa- 
tique. 

L'installation et l'initialisation, qu'il est 
préférable de réaliser sur disque dur, ne 
posent pas de problème, hormis, sur les 
ordinateurs ne possédant pas de disque 
dur mais une mémoire virtuelle, l'adap- 
tation d'un fichier batch. Signalons, en 
outre, la prise en compte de la souris. 
Reste l'adaptation du logiciel à l'impri- 
mante ou au traceur qui est rapidement 
réalisée en choisissant parmi les nom- 
breuses marques et types proposés. Il 
existe également une table de traduction 
qui permet de recoder les caractères 
(utile notamment pour les caractères 
accentués). Tous les formats d'affichage 
sont modifiables. 

L'ECRAN DE CONTROLE 

Au lancement s'affiche un écran de con- 
trôle qui nous propose un catalogue actif. 
Sur la ligne supérieure figurent les diffé- 
rentes fonctions du logiciel : base, 
tableur, grapheur, éditeur (traitement de 
texte), comms, programmes et fichiers. 
Sous chacune des fonctions s'affichent 
les fichiers en rapport avec cette fonc- 
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tion. Il suffit, à l'aide des flèches du pavé 
numérique, des touches de contrôle ou 
encore de la souris, de placer le curseur 
sur le fichier que l'on désire traiter pour 
que celui-ci soit chargé. Une case "nou- 
veau" est sélectionnée de la même 
manière pour les cinq premières options. 

Sur un bandeau, en bas de l'écran, s'af- 
fichent le lecteur de disque actif, les 
témoins de touches, l'option DUO et le 
pourcentage de- mémoire disponible. 
Sous ce bandeau, l'attribution des tou- 
ches de fonctions qui conservent leur 
usage quel que soit le programme qui 
fonctionne, ce qui assure une grande 
facilité de mémorisation et donc, d'ap- 
prentissage. F1 aide, F2 menu, F3 cher- 
cher, F4 éditer champ, F5 copier, F6 col- 
ler, F7 sélectioner, F8 cale/dessin, F9 
duo, F10fin. C'est par F2 que l'on sélec- 
tionnera les sous-menus de chaque fonc- 
tion qui eux-mêmes ouvriront sur d'au- 
tres sous-menus. C'est par la touche F9 
duo que l'on mettra les différents docu- 
ments en liaison : inclusion d'un graphe 
dans un texte, par exemple. De plus, il 
est possible de présenter simultanément 
deux documents à l'écran (superposés 
ou juxtaposés), la touche F9 permet alors 
de passer de l'un à l'autre. 

Il est réellement agréable d'utiliser ABI- 
LITY Plus. On pourrait presque dire que 
ce logiciel fonctionne sous un intégrateur 
(toutefois sans fenêtres ni menus dérou- 
lants) tant la présence de l'écran de con- 
trôle est ressentie comme un pivot 
autour duquel s'articulent de façon par- 
faitement cohérente les différents 
logiciels. 

L'EDITEUR 

C'est à l'éditeur qu'aboutissent tous les 
travaux et c'est avec lui que se peaufi- 
neront les rapports. De beaux rapports, 
d'ailleurs, où figureront graphes et 
tableaux au milieu de paragraphes à l'im- 
pression agrémentée de caractères gras, 
soulignés, italiques, etc. L'éditeur est 
graphique, ce que l'on voit à l'écran est 
donc ce que l'on obtiendra sur le papier. 
Les pages sont matérialisées par des 
bandes épaisses, ce qui facilite la mise 
en page. On trouve dans ce traitement 
de texte les fonctions classiques : justi- 
fication, insertion, déplacement de blocs, 
interlignage et même un correcteur 
orthographique (mais pas syntaxique) en 
français ! Pas de césure, par contre. Il est 
impossible de réaliser du publipostage. 

Il est extrêmement facile d'inclure dans 
le texte des données du tableur, ou des 
graphes du grapheur. Ces données peu- 
vent même rester actives, c'est-à-dire 
qu'elles peuvent continuer à subir .les 
effets d'une modification entreprise dans 
un autre programme. Seule réserve : le 
volume de texte est lié au volume de 
mémoire disponible. C'est sans doute 
pour cette raison que l'on nomme le pro- 
gramme, éditeur et non traitement de 
texte. 



LE TABLEUR 

ABILITY Rus offre 702 colonnes sur 
9999 rangées mais l'on se demande 
comment on peut exploiter totalement 
ces capacités, compte-tenu de la 
mémoire disponible ? Les cellules sont 
nommées "champs". Cela résulte de la 
manière qu'a ABILITY Plus de considé- 
rer les données dans ses programmes. 
La clé de cette intégration réussie est 
précisément cette notion de "champs". 
Quel que soit le programme (texte, cel- 
lule du tableur, graphe), toutes les uni- 
tés de données sont reconnues comme 
étant des champs, ce qui permet leur 
interchangeabilité et leur modification 
dans chaque programme quand on ne les 
a transformées que dans l'un d'eux. 

Le tableur, qui est fréquemment la pièce 
maîtresse des logiciels intégrés, dispose 
de fonctions très puissantes : fonctions 
mathématiques, logiques, trigonométri- 
ques ou financières. Toutes les fonctions 
classiques d'un tableur sont présentes 
avec quelques "plus" comme les réfé- 
rences circulaires qui viennent complé- 
ter les références absolues et relatives ou 
le verrouillage des champs. 

LA BASE DE DONNEES 

Une base de données qui serait classique 
si elle ne bénéficiait pas de la possibilité 
d'importer des données des autres pro- 
grammes. Regrettons tout de même l'ab- 
sence de possibilité de programmation. 

Le point fort de cette base de données 
est sa capacité à lier deux fichiers pour 
en créer un troisième virtuel. Ce procédé 
permet ainsi, par exemple, de lier un 
fichier "clients" et un fichier "achats" 
pour obtenir, sur une même fiche, une 
facturation complète. 

Autre point intéressant, l'élaboration des 
masques de saisie bénéficie outre des 
fonctionnalités de l'éditeur, de la correc- 
tion orthographique. 

LE GRAPHEUR 

Avec le grapheur, nous disposons de 5 
types de représentations : simples bar- 
res (présentation horizontale ou verti- 
cale), barres empilées, lignes (courbes), 
camemberts et graphes orthonormées 
XY. 

La provenance des données est, bien sûr, 
multiple : clavier, ou tout champ existant 
(feuille de calcul, base de données). La 
présentation bénéficie de l'écran graphi- 
que et les caractères sont affichés en 
italique. 

COMMS 

Comms est un programme de commu- 
nication qui permet d'établir une liaison 
avec un autre ordinateur dans les mêmes 
locaux ou à l'extérieur par modem. Le 
paramétrage est aisé. 




C.A. AU 1er TRIMESTRE 
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PRESENTATION 

Il s'agit d'un programme externe qui per- 
met la présentation sur écran d'une suite 
de pages écrans où peuvent figurer du 
texte et des graphes de toute sorte. Ce 
programme est d'autant plus spectacu- 
laire qu'il travaille en musique ! De nom- 
breux airs en tous genres sont mémori- 
sés, y compris la marche funèbre de 
Chopin. Sans doute pour se réjouir de 
l'échec d'un concurrent ! 

MACROS 

Le programme met à la disposition de 
l'utilisateur une vingtaine de macros : 
fonction gosub, affichage de menu, 
attente, automatisation de fonctions 
diverses etc. Les macros préprogram- 
mées constitueront un bon exemple pour 
l'écriture de celles à venir. Les macros 
sont donc programmables mais ne cons- 
tituent, toutefois, qu'une maigre com- 
pensation de l'absence d'un vrai langage 
de programmation. 

CONCLUSION 

Cette première version de ABILITY Plus 
est assurément une réussite. Son utilisa- 
tion est très agréable et, dans ces con- 
ditions, comment ne pas céder quand, à 
ces arguments, s'ajoute celui, imparable 
et décisif, d'un coût que nous osons qua- 
lifier de modique ? 
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4 REVUES POUR LES PASSIONNES 



CPC - REVUE DES UTILISATEURS D'AMSTRAD : en vous abonnant, vous rece- 
vrez chez vous votre revue. Vous bénéficierez de réductions sur certains produits et vous 
recevrez gratuitement 1 n° hors-série tous les deux mois. 

AMSTAR : en avant première, toutes les nouveautés sur AMSTRAD - des programmes, 
des articles ! A la demande de nos lecteurs, nous prenons désormais les abonnements. 
PCompatibles MAGAZINE : la référence en matière d'initiation et de perfectionne- 
ment sur les "compatibles PC". 

Attention, tous nos abonnés reçoivent avant parution des souscriptions sur les nouveaux 
livres I 



□ CPC AMSTRAD 1 1 numéros 1 80 F 

□ 6 numéros 105 F 

□ Abonnement essai 3 numéros 55 F 

□ AMSTAR 11 numéros 100 F 

□ PCompatibles Magazine 11 numéros 200 F 
D Arcades 1 1 numéros 200 F 



NOM. 



Prénom 



Adresse 



DEUX Code postal 



Ville 



Date 



Signature - 



MOIS Je m'abonne à: 



™ . .-.y . ■ ■■■ 



Merci d'écrire en majuscules. Ci-joint un chèque libelle a l'ordre de : Editions SORACOM. 
Service Abonnement - BP 1 1 - 351 70 BRUZ - Retournez le(s) bulletin(s) ou une photocopie. 
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PARTICIPEZ A CPC ! 



Remplissez soigneusement ce coupon et joignez-le à votre programme, sur cassette ou sur disquette. Envoyez le tout 

CPC 

La Haie de Pan 

35170 BRUZ 



Le programmeur . 
Nom : 



Prénom 



Age 



Adresse complète :. 



Le programme : 
Nom : 



Catégorie : D Jeu IJ Utilitaire D Educatif 



Taille : 



Périphériques utilisés 



Support : 

Compatibilité (testée) avec : D 464 D 664 D 6128 D PCW 8256 

D PC 1512 D PCW 8512 



Je soussigné, 

è une autre revue. 



Attestation sur l'honneur 
_ , déclare être l'auteur du programme ci-joint et ne l'avoir jamais proposé 



Le: / / à: 
Signature : 
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serves s'appliquent également aux logiciels publiés 
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Recherche extension DKTRONIK + imprimante 
DMP 2000. Faire offre tél. 69.42.92.96, Dur : 
42.85.60.97. Recherche contact sur Paris. 

Vends multiface 2 pour CPC 400 F. Tél. 
53.20.66.52 après 19 h, demander Eric 

Vends Pagemaker francisé + doc. originale pour 
le CPC 6128, 350 F Tél. 74.94.48.50 

Serait prêt à acheter la K7 Rocky Horror Show à 
une valeur de 100 F. Sylvain Berco, tél. 
39.78.93.19 

Echange caméra sonore 8, super 8 contre impri- 
mante ou lecteur de disquettes 5" 1/4. Tél. 
30.95.83.56 - 78406 Aubergenville. 

Urgent, vends CPC 61 28 couleur t. b.e. (02/87) + 
joy + câble magnéto + nbrx logiciels (1MO) + 
livres + rev. 4000 F (v. 7000 F). Tél. 97.21 .41 .03 



Vends Imp. MCP 40, neuve 800 F + mon. mono, 
IBM, 400 F + orig. Textomat 200 F + orig. Her- 
cule 150 F. Tél. 43.01.84.97 après 19h. 

Vends 50 jeux originaux sur K7, 50 F les deux, liste 
sur demande. Chardon J. Mont Saxonnex, Le Mar- 
tinet 74130 

Vends Moniteur couleur Thomson + prise péritel 
1200 F (acheté 2000 F) ou échange contre DDI. 
Tel 97.05.18.34 

Je traduis toutes vos notices angl. en français. Ala- 
gnou Patrick, av. Maréchal Joffre 31 800 Labarthe 
de Rivière. 

SOS, cherche pers. ayant réalisé répondeur tél. du 
n° 20 et du n° 22 émulez minitel réalisation câble 
et circuit. J'ai K7. Guilbert J.Louis, 1 2 r. L. Arly 
62223 St Laurent Blangy tél. 21.55.17.55 

Vends CPC 464 couleur + 70 jeux dont Light 
Force, Ikari + joystick pour 3000 F, cède 2500 F. 
Tél. 67.81.22.74 

Vends CPC 464 + jeux + livres + utilitaires + ral- 
longe + interface couleur + radio pocket 2200 F. 
Mialon Alain tél. 43.03.10.36 



Ulicronaute 

LE SPECIALISTE 
NANTAIS DU PC 

Revendeur qualifié conseil 

M • S.A.V. personnalisé 

• Contrat de maintenance 

• Logiciels - Livres 

• Location 

ni Adresse : 

9 , rue Urvoy de Saint Bedan 
44000 NANTES 
Tél. 40.69.03.58 



PETITES 
ANNONCES 



Vends CPC 464 couleur + DD1 + 64 K + jstk, 
nbr doc. + 1,5 Mo, jeux + log. prof + tur. Pasc 
+ nbr prog. cale. Num : 4500 F -Tél. 65.67.10.67 
/61. 40. 99. 13 

Echange Bounder, Tomahawk, Histoire d'or sur 
PCW. Tél. 94.68.25.65 (Franck) 

Vends program. Eprom + cartouche Eprom 16 K 
+ effaceur Eprom + 8x27128 vierges, cause 
double emploi 800 F. Tél. 42.43.34.01 Paris. 

Urgent, vends/échange jeux (2001 ou utilitaires 
cass. et dise, sur Amstrad. Lécuyer Christophe 8 
rue des Petits Sablons 27400 Acquigny, tél. 
32.50.24.79 

Suite achat Amiga, vends mes 60 dise 3', 60 F 
pièce ou 500 F les 10. Tél. 47.90.64.13 

Tous les tirages du loto depuis l'origine ! 60 F/cas, 
90 F/disk CRT. M. Willemin 3 r. de Franche-Comté 
70000 Vesoul tél. 84.75.01.48 

Urgent cherche second drive pour 61 28. Faire pro- 
position tél. 60.04.57.20 Eric, après 18 h. 

Tout le programme d'histoire-géographie de 3» en 
K7, 15 leçons 100 F. Olivier 78.55.11.85 
septembre. 

Vends logiciels Hercule - Fer et Flamme, Jumpjet 
sur disk. Guy Griebel 33 rue de Lobsann 67250 
Merkwiller, tél. 88.80.78.02 

Vends CPC 464 mono + lecteur 3 P + jeux et uti- 
litaires sur cass. et dise + livres 3500 F environ. 
Moulun S. Tél. 29.75.95.57 

Vends K7 pièce de 30 à 60 F ou lot 8 K7 280 F 
ou éch. contre Commando sur K7. Contacter Chris- 
tophe tél. 94.73.70.51 (Var). 

Achète programmateur Eprom Jagot & Léon réf E 
107. Faire offre M. Régis J.N, 17 rue du Chenet 
25230 Dasle tél. 81.34.45.05 

Vends ZX 81, 64 K + jeux + 23 livres + c. cor- 
resp. (1682 F) E 1600 F - Vends Canon X07 + 
imp. 710 + ext. 8 K + 3CM 101/100/140 + 5 
cass. + liv. + FXbase. Martinez Tél. 30.55.1 1.49 
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Compatibles IBM 
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33800 BORDEAUX 
Tél.: 56.92.91.78 

Télex 572-421 
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PETITES 
ANNONCES 



La place réservée aux petites annonces est 
limitée. En conséquence, celles-ci passent 
dans leur ordre d'arrivée. Par contre, les peti- 
tes annonces farfelues sont systématique- 
ment rejetées... De même, comme il est peu 
probable qu'il existe des "généreux dona- 
teurs" de matériels ou de logiciels, les peti- 
tes annonces faisant appel à ces philantro- 
pes ne seront insérées que si la place libre 
le permet. 

Seront refusées toutes les annonces visant 
à vendre ou échanger des listes ou copies de 
logiciels non garantis "d'origine", ainsi que 
toute annonce incitant au piratage. 
En conséquence, réfléchissez bien avant 
d'envoyer vos textes. 
Les petites annonces doivent impérativement 
nous parvenir sur la grille (découpée ou pho- 
tocopiée), le texte étant rédigé à raison d'un 
caractère par case. 

Enfin, toute annonce non accompagnée de 
timbres ne sera pas insérée. 

Vends CPC 664 coul. + imp.SPlOOOA + 39 disk 
pleins + nbx magazines, le tout : 5000 F. Tél. 
34.75.31.11. Olivier après 19h00 (dpt. 78). 

Vends pour Amstrad disquettes de jeux Elite (état 
neuf) + intérieur (aventure), le lot : 200 F. Tél. 
20.05.25.40. 

Vends Amstrad CPC 464 année 86 + 90 log. + 
joystick Amstrad inusable + conseils pratiques. 
Prix à débattre. Tél. 79.83.10.67 ATB. 

Cherche clavier seul 6128 Qwerty. Tél. 
83.64.38.02 (Toul). 

Echange langage Lips et notice contre l'interprète 
ESAT software. ROUBERT - Route de Bordeaux - 
24200 Sarlat Lacaneda 464, 6128. 

Vends 6128 couleur TBE + jeux et util. + livres 
et revues : 4000 F. Tél. 88.92.59.68 de lOhOO à 
23h00. 

Toi qui m'as aidé pour l'affaire Sydney help. J'ai 
perdu ton adresse. David CHUPIN - 5, Parvis de la 
Bièvre - 92160 Antony. 



Vends Amstrad 464 mono : 1200 F. DDI1 : 
1 200 F. Troniks 64 Ko : 300 F. Tél. 92.61 .30.88 
le tout en excellent état. 

Vends Datacord (mémorise 600 pages minitel sur 
magnéto) : 250 F. Logs spécialisés Okimate 20 et 
Microline 182 : 120 F. Tél. 90.55.91.65. 

Vends ZX81 + 1 logiciel de jeu + 1 extension 
16 Ko + magnétophone 800 F. Tél. 

61.86.71.13. 

Vends PCW 851 2 2 drives imprimante + RS232C 
+ turbo Pascal tout garanti état neuf : 6500 F. 

Donne logiciel * dise Tel 28 29 02 14. 




irtFORriRTIQUE 



Bordeaux - Cannes - Avignon 

ASSISTANCE ET FORMATION 

Toutes les applications 

de votre micro : 

GESTION - COMPTABILITE 

PROFESSIONNELLES ET 

FAMILIALES 

257, rue Judaïque 

33000 BORDEAUX 

Tél. 56.24.05.34 

CREDIT VENTE PAR CORRESPONDANCE 



Vends HP 15 C. Tél. 39.58.64.85 

Vends CPC n° 1 5, 1 7, 1 8, 1 9, 23, 25 + Amstrad 
mag. 12, 14, 16, 33, 34 : 9 F chaque + HS : 12 F 
+ K7 Xexious, Batman : 35 F chaque. Tél. 
22.27.17.35 Jérôme. 



Vends CPC 664 couleur + jeux + livres + joys- 
tick, état neuf, le tout : 3000 F. Tel . 43. 76. 1 2 .03 , 
demander Sylvain, urgent. 

Cherche manuel livré avec DMP 2000 (original ou 
photocopie). Faire offres à P. VALENTINO - Hage- 
nauer STR4 - D6740 Landau RFA. 

Vends Amstrac CPC 464 couleur + IMP DMP1 + 
jeux + livres + joystick + utilitaires pour 3500 F. 
Tél. 21.86.10.48 après 19h00. 

Vends pour Amstrad, imprimante Fastext 80, 
valeur 2800 F, vendu : 2200 F + traitement de tex- 
tes sur disk. Patrice, tél. 73.63.72.58. 

Achète CPC 61 28 TBE sans moniteur, prix intéres- 
sant. Faire offres M. Guy GRELET - 28700 Houville 
La Branche - tél. 37.25.72.64 HB. 

Vends nbx logiciels Amstrad originaux, liste sur 
demande. Réponse assurée. CHARRIER Patrice - 
Bussières et Pruns - 63260 Aigueperse. 

Affaire ! Vends Okimate 20 complète + rubans ; 
1 an, très bon état, prog. copie écran : 1300 F. Tél. 
46.05.42.08 après 1 8h00 Olivier. 

Vends Mercitel CPC2 + RS232C associée, neuf : 
1700 F. ROGUES Jacques - tél. 40.65.84.03. 

Stop ! Echange jeux ou utilitaires sur disk. Contac- 
ter Frank, tél. 29.31.93.11. 

Vends nombreux jeux pour CPC sur cassettes et 
disquettes. Pour renseignements, tél. 
60.70.16.41. 

Recherche CPC 664 vert avec une ou deux disquet- 
tes contre CPC 464 vert + 80 jeux et 1 joystick . 
Tél. 32.30.07.31 après 1 9h00. 

Cherche personnes désirant faire des parties 
d'Othello par correspond. Ecrire à DECOSSIN 
J.-P. - 29, rue d'Artois - 59000 Lilles. 

Vends tablet. graphique ou échange contre lecteur 
5" 1/4 ou imprimante. Faire offres au 
1 .42.41.72.70 (le soir de préférence) Paris. 

Vends CPC 6128 coul. + imp. PD80 + 120 logi- 
ciels K7 et disk + joystick + livres, valeur 
15 000 F, vendu 8000 F. Tél. 69.43.10.44. 








Vous pouvez passer directement vos annonces sur le minitel 

Attention : Dans un tel cas elles ne seront pas dans la revue. Une annonce envoyée à la rédaction 

■ est mise sur le serveur dans les 48 heures. 
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Coupon à renvoyer accompagné de 4 timbres à 2,20 F à 
SORACOM, La Haie de Pan -35170 BRUZ 



Gagnez du temps ! Sur Minitel 36.15, tapez MHZ 
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Photocomposition SORACOM - Photogravure BRF.TAGNE PHOTOGRAVURE 35170 BRUZ - Impression RFI (77) 

Distribution NMPP - ISSN 029fi6o8') 



Whaque mois chez votre marchand de 
journaux. 




I ous les jeux sur ordinateurs, consoles et 
minitels. 



DITES-MOI 
TOUT I 

Votre avis nous intéresse I 




Vous avez des 
remarques, des 
suggestions ou des 
critiques à formuler 
concernant le con- 
tenu du présent 
numéro... 
Vous souhaitez 
voir traiter un sujet 
particulier dans un 
prochain numéro 
de la revue... 



L'équipe rédactionnelle de CPC est à 
votre écoute 24 heures sur 24, grâce 
à son serveur télématique. Composez 
le 3615, code d'accès MHZ, choix 
Messagerie, boîte CPC REDACT. 



PROTEGEZ 
VOS REVUES! 

BON DE COMMANDE CLASSEUR (port inclus) 



NOM 



Prénom 



Adresse 



Code postal 



Ville 



Je désire recevoir 




Classeur(s) THEORIC : 80 F 

Classeur(s) AMSTAR : 60 F 

Classeur(s) PCompatibles Magazine : 60 F 



Classeur(s) CPC : 60 F 
Classeur(s) MEGAHERTZ : 80 F 

Signature 



Ci-joint chèque de 



F au nom des Editions SORACOM - La Haie de Pan -35170 BRUZ 



BONDE 
COMMANDE 

Attention : les abonnements cassettes et disquettes ne sont pas rétroactif. 



NOUVEAUTES 

+ port 10% 



AMSTAR n° 1 épuisé 

□ Compilation CPC 1 -2-3-4 
D La pratique des imprimantes 

Michel ARCHAMBAULT 

□ Apprenez l'électronique sur AMSTRAD 
P. BEAUFILS & B. DESPERRIER 



LIVRES 

+ Dort 10% 



D Mieux programmer AMSTRAD 
D Communiquez avec AMSTRAD 

D. BONOMO-E. DUTERTRE 
D Jouez avec AMSTRAD -KERLOCH 
D Programmes utilitaires pour AMSTRAD 

Michel ARCHAMBAULT 

L'Univers des PCW- Patrick LEON 

Cassette 

Communiquez avec AMSTRAD 

Disquettes 

L'Univers du PCW- Patrick LEON 

Communiquez avec Amstrad 



70 F 
95 F 
95 F 

85 F 

90 F 
48 F 

85 F 
119 F 

190 F 

150 F 
250 F 

A : TOTAL 



B: PORT 10% 
A + B TOTAL GENERAL 



ANCIENS NUMEROS 

Franco de port 



Attention, n°1 à 6, 7, 12,14, 15 et 21 épuisés 



U 8,9,10,11,13,16,17,18, 

20, 22, 23, 24, 25, 26 
□ Hors série n° 1 avec cassette 



25 F 
47 F 



REPORT TOTAL GENERAL A + B 

□ Hors série n° 2 sans cassette 13 F 
D Hors série n° 3 sans cassette 15F 

□ Hors série n° 4 15 F 
D Hors série n° 5 15F 
D Hors série n° 6 15 F 
Entourez le (ou les) numéro(s) commandé(s). 



CASSETTES 

Franco de port 



Cassettes n° 1,2, 14, 17, 18 épuisées 
1 cassette représente un numéro 

D abonné 45 F 

D non abonné 55 F 

D abonnement cassettes (11 n c ) 450 F 

Je commande les cassettes n° 



DISQUETTES 

Franco de port 



1 disquette contient 2 n° consécutifs de CPC 

- Disquette n°1 comprend CPC 1 et 2 

- Disquette n°2 comprend CPC 3 et 4 

- Disquette n°3 comprend CPC 5 et 6 

- Disquette n°4 comprend CPC 7 et 8 

- Disquette n"5 comprend CPC 9 et 10 

- Disquette n°6 comprend CPC 11 et 12 

- Disquette n° 7 comprend CPC 13 et 14 

- Disquette n°8 comprend CPC 15 et 16 

- Disquette n° 9 comprend CPC 17 et 18 
-Disquetten" 1 comprend CPC 19et20 

- Disquette n°11 comprend CPC 21 et 22 

- Disquette n" 12 comprend CPC 23 et 24 

- Disquette n" 13 comprend CPC 25 et 26 

- Disquette n°1 HS comprend CPC 1 HS 

- Disquette n°2HS comprend CPC 2 HS 

- Disquette n°3HS comprend CPC 3 HS 

- Disquette n°4HS comprend CPC 4 HS 

- Disquette n°5HS comprend CPC5HS 

- Disquette n°6HS comprend CPC 6 HS 

D abonné 110 F D non abonné 140 F 

D abonnement disquettes (6) 600 F 

Je commande les disquettes n° 

Total général franCO Port on sus 10% pour envois par avion 



NOM: 



Prénom : 



Adresse : 



Code postal : 
Date : 



Ville : 



Signature : 



Merci d'écrire en majuscules. 

Ci-joint un chèque libellé à l'ordre des Editions SORACOM. Retournez le(s) bulletin(s) ou une photocopie à : Editions SORA- 

COM-LaHaiedePan-35170BRUZ. 



LA COULEUR C'EST LA VIE 

MERCITEL 

Les 8 COULEURS 

du MINITEL sur 
PC 1512 AMSTRAD 
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PCI "GRAND PUBLIC" 

• COULEUR les 8 couleurs du Minitel 

• Emulation Minitel 

• Mailing à partir de l'annuaire électronique 

• Le câble de liaison au Minitel 

• Le logiciel 

• Le livre d'initiation 

PC2 "MATRA + M.E.R.C.I." La Puissance II 

• COULEUR les 8 couleurs du Minitel 

• Annuaire personnel avec codes postaux 

• Mailing à partir de l'annuaire électronique 

• Procédures de connexion automatique 

• Accès au réseau Transpac - Télex via serveur 

• Calcul des temps de communication 

• Compatibles Hayes - Transfert fichier avec Open Access, 
Symphony, Framework II, Crosstalk, Xmodems, etc.. 



/ kli un. lii Ga il. 

Maintenance Electronique Reconditionnement Construction Informatique 

Rue Ampère - Z.I. Ingré - 45140 ST JEAN DE LA RUELLE ® 38.43.11.83 



CPC 
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Gérez 
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Les questions que vous nous posez, les problèmes que 
vous nous soumettez dans votre courrier couvrent tous 
les champs d'application du CPC. Il était dommage que 
les réponses restent individuelles. Nous ouvrons donc 
cette rubrique qui traitera des cas les plus fréquemment 
rencontrés et des problèmes dont nous pensons qu ils 
sont d'ordre général et dont les solutions pourront 
apporter une aide précieuse à nombre de lecteurs. 



cfass 
ls\s 



Lucien RAUJOT 77220 Greti Roland PIERRE 56250 Elven 

J'ocfière régulièrement les disquettes de 
CPC. Comment dais-ie faire pour sépa- 
rer le', programmes (jeu*, éducatifs, utt- 
litaireslsur d'autres disquettes? 



l 



acile de regrouper les 
nés à voire convenan- 



a les transférer sur une 
ous aurez formatée en 



Je ne m'en sors pu-, jvec les listings de 
la série CAO sur CPC. 

Dans nu souci de simplification 
nous appelons sur nos disquet- 
tes les différents fichiers de eetle série 
CAO-!. CA.02 etc. Il esl bien évident 
qu'il convient de les regrouper sur une 
disquette en les renommant conformé- 
meni aux différents articles de la série. 

On m'a offert des cossettes de (eu. Com- 
ment /es transférer sur disquette pour 
mon 6128 s 

£a plupart des cassettes de jeu 
son! proiégées contre le pira- 
lage et leur transfert sur disquette 
nco^site l'utilisation d'un boîtier péri- 
phérique spécialisé tel que Mirage 
Imager. Mais allention, l'utilisation 
du jeu a partir de la disquetle nécessi- 
tera également le raccordement de ce 
dispositif à votre 6128. 



J'ai toujours un prob/ème avec le pro- 
gramme de recherche documentaire du 
n° 22. Quand je veux modifier ou sup- 
primer un document le programme 
"pianfe" définitivement. Après plusieurs 
sorties du listing sur'imprimonte, je n'ai 
pas encore réussi à trouver l'erreur. Si 
personne d'autre n'a encore signalé cette 
erreur, il s'agit certainement d'une faute 
de frappe de ma port et n'en tenez pas 

JH mitre connaissance, ce pro- 
JHi gramme ne comporte aucune 
erreur. Puisque vous avez la chance 
d'avoir une imprimante, comparez 
vote listing ligne à ligne avec celui de 
la revue, en vous faisant aider, si pos- 
sible, par une autre personne. 

Possionné de généalogie, un programme 
sur ce sujet est-il possible à traiter ? 

Nous avons publié dans le n D 10 de 
CPC, un programme écrit par Gérard 
CI-AVREUL el intitulé Arbre généa- 
logique. 




CHARGEUR HEXA 

Annie ROUSSEAU, de Compiègne, s 
quiète de savoir comment et à q 
endroit entrer les codes hexadécimi 
du programme ? bis du /eu de Mille £ 
nés de CPC 24. 



■ Iwmg I de Mille Bornes es! 
:c qu'on appelle un chargeur 
.■s hexadécimal. Le BASIC 
.•s limites, noiamment en rapi- 

appelês à écrire certain» par- 
ce programmes en langage 



:.bi 



pas possible d'entrer ee langage par le 
BASIC (on utilise pour cela un assem- 
bleur), fout le monde ne possédant 
pas un de ces programmes assem- 
bleurs, l'astuce consiste donc dans le 
codage des données du programme 
assembleur en valeurs hexadécimales 
(base Ih) et à leur implantation directe 
dans la mémoire de l'ordinateur aux 
adresses adéquates. Celle partie de 
programme, une t'ois implantée, sera 
appelée par la commande BASIC 
■■('Ail ". 

]| s'agil donc, dans la pratique, d'en- 
trer le listing 1 de Mille Bornes et de 
le sauvegarder, puis de le lancer. Vous 
pourrez alors cnlrer les codes HEXA 
du listing 1 bis qui seronl vérifiés auto- 
matiquement ligne à ligne. A la fin de 
la saisie, la sauvegarde est automati- 
que. 

RSX 

Ralph FUCHS de Metz demande si, 
dans Fronce Rivières de CPC Hors Série 
4, les mots précédés d'une barre verti- 
cale (SHIFT + yj sont bien des comman- 
des BASIC. 

Ces mots sont des RSX - exten- 
sions résidentes du système - et 
correspondent à des commandes 
BASIC (en RAM) qui viennent s'ajou- 
ter aux commandes de la ROM. 
Il est ainsi possible de programmer 
une commande iBOX qui dessinera un 
rectangle ou IDPOKE qui "pokera" 
des valeurs sur deux octets (voir ces 
deux commandes dans RSX à GOGO, 
CPC 16). Ces nouvelles fonctions, 
réduites à un mot el d'éventuels para- 
mètres, augmenlent doue la puissance 
de votre BASIC. Pour plus de rensei- 
enements sur les RSX, voir COM- 
MENT CONSTRUIRE UNE RSX 
dans CPC 14. 

ÇA NE MARCHE PAS I 

Mourice PICARD, de Tours, se bat avec 
un programme qui s'obstine à ne pas 
vouloir fonctionner. 




fl n'est pas le seul à rencontrer 
te lype de problème, une bon- 
: part du courrier t'ait état de tels 
uis. Alors, pour que nos lecteurs 
s'arraehenl pas les cheveux (du 
moins pas trop !), voici quelques con- 
seils de base que nous ne répéterons 
pas ! 

Avant toute saisie, s'assurer que le 
programme s'adresse bien au type de 
CPC que vous possédez. Une petite 
croix en correspondance dans la 
vignette sous le titre vous assure une 
compatibilité sans faille. Ensuite, et ce 
point est extrêmement important, lire 
et relire le texte de présentation. De 
nombreux renseignements cruciaux y 
figurent souvent. La saisie peut alors 
commencer . On veillera à ne pas con- 
fondre les caractères, notamment 1 , 1 
et I ou encore O et et même S et B. 
D'une manière générale, efforcez-vous 
de saisir le programme à l'identique. 
Ne modifiez pas les numéros de ligne, 
ne supprime? pas les lignes de REM, 
un branchement peut y être effectué. 
Respecte/ le type de caractères (majus- 
cule, minuscule). N'oubliez pas que 
lorsqu'un message d'erreur pointe une 
ligne correcte, c'est que l'erreur se 
trouve en amont dans le programme 
(cas fréquent avec 1MPROPER AR- 
GUMENT ou TYPE MISMATCH. 
Enfin, n'hésite?, pas à utiliser le pro- 
gramme ami-erreurs qui est le meilleur 
gage de réussite dans la saisie. Mais il 
n'est opérationnel que depuis les der- 
niers CPC. Il vous faudra donc, pour 
les numéros antérieurs, redoubler de 
vigilance. 

PHOTOCOPIES 

te même lecteur nous demande de lui 
envoyer un certain nombre de photoco- 
pies de listes de programmes et souhai- 
terait que nous lui procurions /a nomen- 
clature détaillée des CPC5, 6, 8, 12 etc. 
{]4 numéros) 

£u demande en photocopie est 
tellement forte que si nous y 
répondions, le secrétariat y travaille- 
rail a plein temps. Pas de photocopies, 
donc. Quant à la nomenclature des 
articles parus dans CPC, il suffit, pour 
la consulter, de lire les pages centra- 
les de CPC 19 qui concerne les numé- 
ros l à 17. 

TABLEAUX DE VARIABLES 

P. SAINLEGER, de Ste Maure de Tou- 
raine, nous suggère de publier avec tes 
programmes, Ta liste des variables 
correspondantes. 



ÊjÊ ous essayons d'obtenir de nos 
■W auteurs, qui sont souvent des 
lecteurs, le tableau des variables de 
leur programme. Certains semblent 
ressentir quelque difficulté à ie dres 
ser, d'autres présentent un pro 
gramme parfaitement commenté 
Sachez, si vous êtes un auteur en puis 
sance, que la préférence peut être don- 
née à un programme dont le comi 
mire est précis. En outre, il est dans 
l'intérêt même du programmeur de 
dresser la liste de ses variables 
AV ANT de passer à l'écriture du pro- 
gramme. Cela apporte une plus 
grande maîtrise de l'écriture et prouve 
que l'on domine son programme et 
non l'inverse. 

CONSEILS D'ACHAT 

M. Claude PAYRE, de la Sey ne- sur-Mer, 
voudrait apprendre /'assembleur mais ne 
soit ni quel programme ni que/ ouvrage 
se procurer. 

fl nous est impossible de répon- 
dre à ce type de question autre- 
ment qu'en adressant la liste des pro- 
grammes ou/et des ouvrages existant 
sur le sujet, ce qui serait parfaitement 
vain. Il reste qu'il est possible de con- 
sulter les bancs d'essai de programmes 
parus dans CPC ainsi que la rubrique 
LA VITRINE DU LIBRAIRE qui 
peuvent aider utilement l'acheteur 
potentiel. 

PETITES ANNONCES 

Claude DEMONGEOT, de Tautery nous 
demande de lui venir en aide dans son 
aventure à bord du paquebot de MEUR- 
TRES SUR L'ATLANTIQUE. 

Voilà le type même de question 
à poser par l'intermédiaire des 
petites annonces de CPC. Les P. A. ne 
constituent pas seulement le meilleur 
moyen de vendre et d'acheter du maté- 
riel, elles sont encore une ouverture 
sur une relation directe avec d'autres 
lecteurs et, parfois, l'ultime moyen 
d'obtenir la réponse à un problème 



Robert COSTE, de la Se/ne-s. 
regrette l'emploi, dans certains program- 
mes, de termes anglo-si 

Nous avons eu la chance, dans 
notre beau pa\ s, de bénéficier, 
aux premiers balbutiements de la 
micro-informatique, de traductions 
des termes techniques de notre passe- 
temps favori. Lltilisons-les de préfé- 
rence aux autres, tout le monde ne 
parle pas l'anglais Le français, oui ! 
Les choses sont suffisamment hermé- 
tiques en informatique, facilitons au 
moins la communication ; n'en rajou- 
tons pas. "Je charge le drive avec le 
floppy et je boote le DOS" . vous a un 
de ces airs faussement professionnels 
qui confinent à la puérilité. Passons 
outre et restons simples. 
CONNECTEURS 

Etienne KNAtL-DEMARS, de la Force, 
vient d'acquérir un CPC 6 1 28 AZERTY 
et s'étonne de la modification des con- 
necteurs d'extension. 

fn effet, les derniers modèles 
A,7,ERTY de la firme AMS- 
TRAD nécessitent l'emploi de nou- 
veaux câbles de liaison. Une char- 
mante attention à laquelle seront sen- 
sibles les possesseurs d'un modèle 
QWERTY qui ont imprimante et lec- 
teur de disquette et qui avaient envi- 
sagé de le remplacer par la nouvelle 
merveille Mais ne désespère? pas. Il 
existe de< adapteurs commercialisés 
par Bretagne Edit Presse (voir catalo- 
gue dans CPC). 

HUMEURS 

Un lecteur, que nous n'aurons pas /a 
cruauté de nommer ici, nous conte ses 
déboires avec le programme anti-erreurs 
et termine en nous affirmant que ce pro- 
gramme est tout à fait inintéressant. Sui- 
vent six signatures curieusement 
semblables. 

■ In exemple typique de refus 
W d'auto-critique. On ne lit pas 
les commentaires du programme, on 
passe des heures à saisir un pro- 
gramme antérieur à la publication de 
l'anli-erreurs, d'autres heures à tenter 
de comprendre le pourquoi du non 
fonctionnement et le verdici tombe : 
ce programme n'a aucune portée ! 
Avant de douter de votre revue, voyez, 
si, par hasard, vous n'auriez pas une 
pierre dans votre jardin» 
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. FESTIVAL DE LA MICRO. N'oubliez 
pas / Du 9 au II octobre 1987 à /'Espace 
Ausfer/ffz (30 quai d'Austerlitz 75013 Paris) 
se déroulera le Festival de la Micro, orga- 
nisé par Néo-Média. 7outes les marques 
seront représentées. Donc, si vous ëfes un 
vrai fanatique de \a micro, rendez-vous sur 
le stond CPC. 




• GRANDE EXPOSITION DE 
LA MICRO-INFORMATIQUE. 

Du Mou I9septembres'est dérou- 
lée au CNIT de la Défense à Paris, 
la grande exposition de la Micro- 
informatique. Plus de 150 expo- 
sants, constructeurs et distributeurs se 
sont réunis pour présenter aux utili- 
sateurs de la micro -professionnelle, 
les dernières nouveautés, tant au 
niveau des matériels que de leurs 
applications. 

Bien entendu, Amstrad était présent 
à cette grande manifestation. A cette 
occasion, nous avons pu voir l'arri- 
vée en France du "petit dernier" : 
le PC 1640 ECD qui se situe en haut 
de la gamme des "compatibles" . 
Haut en couleurs, puisqu'il est capa- 
ble de gérer 64 cou/eurs tout en affi- 
chant 16 couleurs simultanément, le 
PC 1640 a l'originalité de proposer 
à l'utilisateur tous les modes grophi- 

; existant déjà. 

s un premier temps, seule la ver- 
sion avec disque dur 20 M va être 
disponible en France. 
PC 1640 HD 20 ■. 13390 F hors 




• GONFLEZVOTREPCÏ5ï2.NECest 

une société japonaise qui figure parmi les 
géants de l'industrie des semi-conducteurs. 
Son catalogue de microprocesseurs vient de 
s'enrichir de deux nouveaux produits, les V 
20 et V 30, qui peuvent remplacer, sons 
modification hard, les 8088-2 et 8086-2, 
tout en apportant un gain de vitesse consi- 
dérable, que ('on doit en particulier à une 
écriture optimisée du jeu de micro- 
instructions. Sachez, a titre indicatif, qu'un 
PC 1512 équipé du V 30 tourne à quatre 
fois la vitesse du PC standard. Distribué par 
Cholet Composants, tél. 41.62.36.70. 



. CONTRAT DE LICENCE MIXTE: BORLAND- 
EDUCATION NATIONALE. Selon Philippe Kahn, fon- 
dateur et président de Borland International "le marché 
de l'éducation constitue un débouché privilégié pour les 
éditeurs de logiciels et un moyen de toucher directement 
les décideurs de demain". Cette théorie se concrétise 
aujourd'hui par la signature d'un contrat de licence mixte 
entre le ministère de l'Education Nationale et la société 
Borland International. Depuis près d'un an, Thierry Bre- 
ton a participé à l'élaboration de ce fout nouveau con- 
cept de la licence mixte qui consiste en, d'une port, l'ac- 
quisition par l'Education Nationale du droit d'usage et, 
d'autre part, l'achat par les lycées et collèges, des logi- 
ciels Borland. Dans le cas présent, les logiciels concernés 
sont Turbo Pascal, langage de programmation struc- 
turé, Turbo Graphlx, boite à outils pour les program- 
meurs en Turbo Pascal et Reflsx gestionnaire de base 
de données. 

Ce nouveau partenariat entre l'Etat et Borland Interna- 
tional est valable pendant deux ans à portir de cette ren- 
trée scolaire et met ainsi provisoirement un ferme ou pira- 
tage universitaire qui existait pour Turbo Pascal I 




• TOUS A VOS MINITEL5... 

AXIS, agence Etal-Région, chargée 
de h promotion de VIDEOTEX, 
organise on concours d'idées et de 
projets de services Vidéotex pour la 
région Midi-Pyrénées. 
Dons le cadre do concours, deux 
catégories de concurrents onf été 
prévues i 

— les scolofres concoorenf pour des 
idées ou des projets. 

— tes adultes (personnes physiques 
et associations) pour des projets 
uniquement. 

Ce concours sera lancé officiellement 
fin septemnre 1987 et les candidats 
auront jusqu'au 31 d4c*mbr* 
1 9B7pour remettre leurs dossiers. 
Par ailleurs, la remise des prix et la 
présentation des meilleurs projets 
s'effectueront première qurnzainee 
de février 1988. 

Pour retirer un dossier de participa- 
tion, ainsi qoe le règlement du con- 
cours, vous pouvez appeler AXIS au 
61.25.26.77; par Minitel sur 3614 
+ code AXIS ou auprès des agen- 
ces commerciales des Télécommuni- 
cafions à partir du 1"octobre 1987. 
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• AMSTRAD COMPU- 
TER SHOW. Les 23, 24 et 

25 octobre prochains, se 
déroulera la 8' édition de 
l'Amstrad Computer Show, 
exposition organisée par 
Database et qui connaît tou- 
jours autant de succès à cha- 
?'je édition, 
ette fois, l'exposition se tien- 
dra au G-Mex Centre de 
Manchester, immense édifice, 

3u> permettra de disposer 
'un "Théâtre Amstrad" 
pour présenter en non-stop, 
les nouveaux produits. . . 
Ainsi, bien entendu, que tous 
les nouveaux matériels sur 
CPC, PCWou PC... 




• GAGNEZ VOTRE ENTRE- 
PRISE. Vous êtes l'auteur d'un 
programme éducatif performant? 
Celui-ci utilise les services d'où- 
très média (vidéo, minitel etc.) ? 
Si votre seul désir est de parve- 
nir à faire éditer cette œuvre, fe 
concoors "Créa/ion d'Entreprise 
Informatique Intermédia" est fait 
pour vous. Cette épreuve est 
organisée par la CAMIF, la fan- 
dation FIL et la Ville de Niort- Ne 
premier (et unique) prix, pour le 
moins original, est une entreprise 
au capital de 250.000 F. Le 
local, la formation, le conseil juri- 
i diqoe et la garantie d'emprunt 
1 sont également fournis au ga- 
gnant, avec pour but de déve- 
lopper et vendre le logiciel. 
Si vous êtes intéressé par ce con- 
cours, écrivez à: Concours Créa- 
tion d'Entreprise, Carrefour Mé- 
dia Jeunesse de Niort, Hôtel de 
Ville, 79022 Niort Cedex, ou 
téléphonez au 49.2S.00.21 
pour obtenir on dossier d'inscrip- 
tion. (Clôture du concours ; fe 30 
octobre 1987 et résuftats fe 13 
novembre 1987 à Niort). 



• FRENCH CONNECTEURS. 

Une désagréable surprise attend fes 
acheteurs du CPC nouveau. Les con- 
necteurs situés à l'arrière de leur 
machine diffèrent des anciens modè- 
les. Afors, adieu RS 232, imprimante 
sur disque externe. 
Les Dieux de l'informatique veillent 
sur ('AMSTRAD. En effet, il vous est 
possibfe de trouver des adaptateurs 
de BUS au prix de 1 75 F. Où cela ? 
Dans le catalogue Bretagne Edit 
Presse, bien sûr I (voir à ('intérieur 
de fa revue] ou bien chez B.Y Infor- 
matique - (Tel -. 76.43.40.49 ou 
75.02.17.(81, qoi propose égale- 
ment on câble rond permettant le 
branchemenf d'une imprimante sor 
les nouveaux CPC. 
N B. Les adaptateurs proposés dans 
(e eafafogoe sont des prodoits 
Sémaphore. 



; . . • MICRO-APPLICATION 

™ La distribution des produits 

▲ micro- appfication en Belgique 
& et ao Luxembourg est confiée 
a à Easy Computing (021660 
H* Ô3.901. Parmi les logiciels, on 
T trouve: GEM CALCOMAT 

M, PLUS (version 2.0): un tableau 

* graphique sous GEM et 

▲ SUPERBASE PROFESSION- 
W NEL, un système de gestion de 
a base de données 
Sr relationnelles. 
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GUIDE DU GRAPHISME 
AMSTRAD PC 1512 
Georges FAOOT-BARRAIY 
SYBEX 
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B dsnce d'horloge de l'AMSTRAD 
■■PC 1512, en font une machine 
douée pour l'image. L'emploi de BASIC 
2 aux puissantes commandes graphi- 
ques offre uns très grande facilité de pro- 
grammation. Ce livre traite de l'image au 
travers de BASIC 2 (sous GEM, donc) 
qui, nous le déplorons, ne comprend pas " 
de commandes de liaison avec ie 
système de type POKE, PEEK, CALL. 
Dix-neuf chapitres font le tour de la ques- 
tion. La taille des fenêtres avec la repar- 
tition des pixels sur l'écran physique, le 
calcul et la modification de la taille d'une 
fenêtre, l'emplacement des fenêtres, leur 
déplacement, l'écran virtuel, le déplace- 
ment de cet écran sous une fenêtre, la 
modification des unités virtuelles et le 
facteur d'asymétrie, la modification de 
te dimension en pixels de l'espace virtuel, 
l'écran virtuel an mode texte, ses modi- 
fications, les canaux associés aux fenê- 
tres et la récupération des fenêtres de 
dialogue et d'édition, la modification de 
l'emplacement de l'origine graphique. 
Viennent ensuite les travaux pratiques 
avec l'affichage en mode texte et la posi- 
tionnement du curseur ainsi que les 6 
options liées ô l'instruction PRINT, la 
fixation des caractéristiques d'affichage, 
les commandes d'effacement. L'affi- 
chage en mode graphique, l'affichage de 
points avec PLOT et ses 4 options ainsi 
que le tracé de courbes à l'aide de cette 
commande, le tracé de lignes avec LINE 
et ses 6 options, le tracé de courbes. Le 
tracé d'un rectangle avec BOX et ses 6 
options, le tracé d'un polygone avec 
SHAPE et ses 5 options, le tracé d'un 
cercle avec CIRCLE et ses 7 options, 
homothôtie, rotation et inversion. 
Les annexes sont des exemples d'emploi 
de courbes : parabole, hyperbole, sinu- 
soïde (reliées), cardioïde, trifollum, qua- 
drifolium, rosace, lemniscate. 
Un livre très agréable, doté de nombreu- 
ses figures explicatives, de contact aisé. 
Un ouvrage de base. 
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• ENDURANCE 

1 G A AI ES. Une nou- 
velle version d'Inter- 

' national Karaté va 
sortir. Que les purisfeî 
se rassurenf, il s'agit 

modification de prix. 
(Il diminue, bien 
sûr/j. 




• DIGITAL INTEGRA- 
TION . Gaina for the gold I 
C'est le cri qui sera lancé par 
les futurs adeptes de cette 
simulation sportive. A bord 
d'un bobsleigh, vous devez 
remporter la médaille olym- 
pique. Ce logiciel a été écrit 
en collaboration avec le meil- 
leur pilote de Grande- 
Bretagne. 





• GREAUIN GRAPHICS. Gary Uneker's 
superstar soccer (reprenez votre souffle!)... Il 
s'agit d'un /eu de football original, qui allie à 
la rois le /eu d'arcade et la stratégie. Disponi- 
ble en octobre. 

COMPENDIUM -. le délire est assuré avec ce 
nouveau produit de Gremlin Graphics. Décou- 
vrez le monde des Winhs et allez de surprises 
en surprises,.. 



• INCENTIVE SOFTWARE. Annonce u 
ciel entièrement en 3D ■. FREESCAPE Ce /eu, qui 
a pour cadre une lune d'un système planétaire 
étranger est constitué de plus de 20. 000 billions (!) 
de lieux. Selon INCENTIVE, ce logiael n'est ''ni 
un jeu d'arcade, ni un jeu d'aventure, ni un jeu de 
stratégie, mais les 3 à la fois". 



• HEW50N. Les locomotives à 
vapeur vous ont toujours fasciné ? 
(Ah, la bête humaine...). Voici de 
quoi vous réjouir. Devenez le con- 
ducteur de l'Evening Star (c'est éga- 
lement le titre du logiciel), une des 
plus puissantes locomotives brifonni- 



ché du logiciel à petit prix (mais de 
bonne qualité), le label RACK 11 
aura le soutien de MASTERTRONIC, 
en ce qui concerne la distribution. 



• LORfCIELS. Tiré d'un dessin 
animé japonais, COBRA est 
maintenant le sujet d'un logiciel 
d'arcade des plus mouvementés, 
dons lequel vous retrouverez 
tous les personnages de la série. 
140 F K7 et 198 F disque. 
Compilation story : les Hits 4 réu- 
MGT, MARACAIBO et BILLY 



• ERE INFORMATIQUE. 

Suite logique de ERE HITS, 
voici à nouveau une compila- 
tion de "classiques": CRAF- 
TON et XUNK, EDEN 
BLUES, ROBBBOT, SAI 
COMBAT, intitulée -. ERE 
HITS 2. Le prix ? 230 F en 
disquette et 150 F sur 
cassette. 

Sous le sigle "Métal Hur- 
lant", le loaiciel CLASH évo- 
que l'ambiance moite d'un 
polar urbain (voir banc d'es- 
sai dons ce numéro). 120 F 
K7, 180 F disquette. Sont 
annoncés également dans 
cette séné -. CRAFTON & 
XUNK 2 et STRYFE 2 (en 
octobre). 



LA BANLIEUE, le tout pour 
160 F sur K7 et 198 F sur 

MISSION, un jeu multi-salles 
(80) au cours duquel vous devez 
retrouver une formule ultra 
secrète. Disque 198 F, cassette 
160 F. 





■ FIREBIRD. Profitant du 
succès des films tels que "A la 
poursuite du diamant vert" 
ou "te diamant du Nil" voici 
MYSTERYOFTHENILE"un 
jeu d'aventurelarcade dans 
lequel les héros affronteront 
le vilain Abu-Sahl. Autre logi- 
ciel annoncé : BUBBLE BOB- 
BLE avec des petits personna- 
ges tout à fait charmants. 



• CRi.BoakofthedeadfLe 
livre des morts) esf un /eu 
d'aventure oui a pour cadre 
l'Eqvple antique et ses dieux. 
Mondroïd, la suite de 
Çyborg, vous met aux prises 
avec un méchant détenteur 



des plan 


d'un andrc 


y empêche 


Votre missi 


r de produire 


derniers, 


n série. 



- INFOORAME5. LesPCetcom- 
; F| pofib/es ne sont pas en reste. La suite 
I des aventures d'Isa est annoncée 
1 sous le titre LES PASSAGERS DU 
\ VENT 2. Des graphismes encore 
i améliorés, de nouvelles options 
I caractériseront cette aventure. Prix : 
i 290 F. 



• MARTBCH. Sloime est un jeu d'aventure 
employant un mode d'action original .- le 
personnage est continuelle ment confronté b 
de nouvelles situations, son environnement 
apparaît à l'écran et il ne vous reste qu'à 
prendre rapidement la meilleure solution 
pour espérer atteindre la fin du jeu. 



PIERRE MEINSOHN 
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AMSTRAD & 
MINITEL 



Devant l'avalanche de demandes concer- 
nant l'article du n° 14, voici à nouveau le 
plan du câble AMSTRAD/MINITEL décrit 
par Eddy Dutertre. 



Tout d'abord, précisons qu'il existe deux 

types de Minitel : 

■ le standard à modem non retournable 

(inutilisable), 

• le modèle, plus sophistiqué, à modem 

retournable 

C'est ce dernier qu'il faudra posséder 

pour notre utilisation. Il se reconnaît par 

la lettre "R" sur la plaque signalétique 




Quels devront être les ingrédients ? 
Et bien, c'est simple, le programme ci- 
dessous, un simple câble de liaison à réa- 
liser et, bien sûr, un correspondant. 
Rassurez-vous, même si vous êtes seul, 
vous pourrez tester le bon fonctionne 
ment de l'ensemble avec un petit magné- 
tophone à cassette enregistrant les 
signaux BF sortant du Minitel llignel. 



LE CABLE DE LIAISON 

C'est le seul montage à réaliser. Il faut 
disposer d'un connecteur femelle du type 
de celui utilisé pour l'imprimante, d'un 
câble 3 fils ou 2 fils + blindage et d'une 
prise DIN 5 broches. Ce câble réalisera 
la connexion entre la prise imprimante 
AMSTRAD et la prise DIN du Minitel. 
La longueur du câble pourra atteindre, s'il 
est blindé, 3 à 4 mètres. La broche 2 de 
la prise DIN est à la masse. 






A LA RECHERCHE DE 
L'ENREGISTREMENT 



%_î 



Michel 
ARCHAMBAUU 



m 



Beaucoup de nos lecteurs 
n'ont jamais osé avouer qu'il 
leur arrivait de ne pas pou- 
voir recharger un pro- 
gramme pourtant enregistré. 
If ne faut pas croire que cela 
ne concerne que les débu- 
tants... Oh que non 1 Soit par 
"erreur technique", soit par 
manque d'organisation. 

La chose est plus fréquente sur cassette 
que sur disquette, nous insisterons donc 
sur ce premier cas. Ne croyez pas que 
nous allons énumérer les soixante-dix 
commandements des supports magné- 
tiques, vous les avez certainement lus 
rvolés) plusieurs fols,.. 



Lerr 



it de fi 



certains petits détails de fonctionne- 
ment, qui ne figurent pas dans le manuel 
et qui vont alors élucider certains 
"mystères malheureux" dont vous avez 
peut-être été victime. Si ce n'est pas 
[encore) le cas, vous saurez alors vous 
éviter de commettre telle ou telle gaffe 
car vous devinerez le risque. Et si un mal- 
heur survient, par étourderie, ces notions 
nouvelles vous permettront souvent de 
réparer les dégâts. 

N'est-ce pas plus efficace que des con- 
seils "bruts" ? 

L'autre ennemi des sauvegardes est le 
manque d'organisation : au début, on ne 
se méfie pas et l'on est tout surpris de 



*gé dans un désordre Irrô- ^^^^ <■ 

Des conseils ? Non. mais plu- 
tôt des suggestions contre cela. Vous 
pourrez alors choisir ou établir l'AUTO- *t\\ / 

DISCIPLINÉ qui convient le mieux à votre '\ /// 

personnalité. 



Les cassettes audio 

Elles et les platines cassettes ont été 
conçues pour le son, UNIQUEMENT- Les 
utiliser en informatique constitue une 
prouesse technique ; on peut donc tolé- 
rer certaines servitudes et des perfor- 
mances très inférieures à celles des dis- 
quettes. Seul intérêt des sytèmes casset- 
tes : le prix et c'est un argument de 
poids... A titre de consolation, sachez 
que l'on ne pourrait pas enregistrer de la 
musique par un lecteur de disquettes, 
c'est techniquement impossible. Je 
m'explique : 

L'ensemble bande magnétique + tète de 
lecture-enregistrement H- l'électronique 
qui lui est affectée a été étudié pour 
reproduire fidèlement des variations très 
rapides de volume (le son). Autrement 
dit, il sait magnétiser la bande à des 
niveaux très variables, et sans à-coups, 
de zéro s "très fort". Or, en informati- 
que, on se moque de ces milliers de 
niveaux possibles I On n'en veut que 
DEUX, qui seront baptisés "1" et "0"... 
L'ordinateur qui veut transmettre ces bits 
1 et doit alors les CODER en un signal 
"musical" afin qu'il puisse être enregis- 
tré, compris, par un magnétophone. 



Ce codage musical est très complexe, 
non pour le secret mais pour assurer une 
sauvegarde et une lecture sans risque 
d'erreur. Un exemple : un logiciel du 
commerce va représenter environ 
300 000 bits. Si un seul est perdu, l'oc- 
tet en question est incomplet, d'où une 
incohérence, d'où plantage quasi immé- 
diat I Le tristement célèbre "read error 
a" (ou "b"). Donc aucun droit à l'erreur, 
môme 1 sur 300 000... Voilà pourquoi 
j'ai parlé de prouesse technique. Notez 
qu'en cas de "loupé", un lecteur de dis- 
quettes fait (à notre insul une relecture 
du passage, mais avec un magnéto cas- 
settes, c'est bien sûr impossible. 
Avec une platine K7 ordinaire, telle celle 
du CPC 464, la fréquence maxi se situe 
vers 6 à 8000 Hz | = signaux, impulsions 
par secondel ; au-delà, le niveau à la lec- 
ture s'écroule et la "pureté" avec. Une 



sauvegarde à 2000 bauds ( = 2000 bits 
par seconde) obtenue par la commande 
SPEED WRITE 1 doit correspondre à peu 
près à un signal modulé de l'ordre de 
4000 Hz. Il existe des utilitaires qui per- 
mettent de sauvegarder à des vitesses 
très supérieures, 4000, 6000 bauds. Un 
petit calcul rapide vous permet d'évaluer 
le risque ainsi encouru... 
Une bande "ferro" ordinaire de bonne 
marque peut aller jusqu'à 13000 Hz 
environ ; une de la meilleure qualité pos- 
sible approchera les 20000. Mais le gain 
sur une platine K7 de bas de gamme sera 
infime, quelques centaines d'hertz seu- 
lement. Donc inutile d'alimenter votre 
464 avec des bandes super HI-FI. Et sur- 
tout pas avec des bandes à l'oxyde de 
chrome (Cr02) car il ne pourrait pas effa- 
cer complètement l'enregistrement pré- 
cédent I 

Techniquement, on pourrait enregistrer 
et lire à 6000 bauds sur une platine cas- 
sette HI-FI avec une cassette au 
chrome ; mais je vous signale que le prix 
atteint serait alors celui d'un lecteur de 
disquettes. 



t irrégulière I surépaisseurs en 
vagues ou manques), niveau de repro- 
duction très faible et bruit de fond impor- 
tant. Pour enregistrer grand-père passe 
encore, mais surtout pas pour l'informa- 
tique ; même pas à 1000 bauds. 
Une autre gaffe consiste à .utiliser de la 
C-120, car le support est trop mince, 
trop fragile pour une mécanique non HI- 
FI ; d'autre part, on observe souvent une 
faible copie du signal magnétique d'une 
spire à l'autre... 

Revenons au signal codé : il n'y a pas que 
la fréquence qui compte, il y a aussi le 
volume à la lecture. Il semblerait, après 
examen (difficile) à l'oscilloscope, qu'il 
y ait DEUX niveaux (amplitudes) dans les 
signaux. Conséquences, si le niveau 
moyen est trop faible, pas de détection ; 
s'il est trop fort (saturation), les niveaux 
"bas" seront presque aussi forts que les 
"hauts" et là, pas de décodage possible. 
Avec un CPC 464, aux réglages fixés en 
usine, on ne cours pas ce risque. Sauf 
si on veut dupliquer notre précieuse cas- 
sette par copie entre deux magnétopho- 



nes. 




it sur cassette 

Le manuel préconise de sauvegarder â 
1000 bauds et c'est SPEED WRITE qui 
est pris par défaut. Je ne suis pas du tout 
d'accord face à un tel pessimisme. Le 
2000 bauds est fiable sur des cassettes 
"ferro" de bas de gamme mais de mar- 
que connue, ou avouée, telles celles de 
grandes surfaces (Carrefour. Mam- 
mouth...). 

En revanche, l'auteur déconseille très 
vivement les marques bidon ou inexis- 
tantes du genre "Trois C-60 sous blis- 
ter pour 10 francs". Il s'agit de rebuts 
de fabrications conditionnés par des offi- 
cines plus ou moins fantômes : Enduc- 



Il faut savoir qu'un magnétophone non 
HI-FI est équipé d'un dispositif électro- 
nique assez farceur, le C.A.G. i 
trôle automatique de gain" qui r 
automatiquement le volume à l'enregis- 
trement, ce qui va "comprimer" notre 
signal. C'est très bien pour la parole, 

sible en musique et t 
nformatique. Le niveau moyen à la lec- 

plutôt faible, parfois à la limite 
de ce que peut tolérer le 464. Donc, pour 
dupliquer votre bande, vous pouvez la lire 
sur un magnéto ordinaire, mais il faut 
enregistrer sur une platine Hi-Fi en posi- 
tion "volume manuel", et assez fort, 
mais sans saturer. 

Les éditeurs de logiciels exploitent sou- 
vent ce fait pour limiter la piraterie de 
leurs cassettes : celles-ci sont volontai- 
rement enregistrées à des volumes fai- 
bles et avec peu d'écart entre les deux 
niveaux, à ras de la tolérance des CPC 
464. Ainsi, une copie faite entre deux 
magnétophones conduira à l'échec au 
chargement. Parfois, ils "envoient le 
bouchon trop loin" et l'original est pres- 
que impossible à charger. A ce propos, 
ne certaine série de 



"SORCERY" qui fut un désastre, envi- 
ron 70 % de retours au dire d'un ven- 
deur .FNAC... 



Le cycle d'un enregistra ment cassette 

Supposons la sauvegarde d'un pro- 
gramme BASIC de 5000 octets. 

— Pendant quelques secondes, silence 
mais le magnéto tourne : ne croyez sur- 
tout pas que cette pause au départ soit 
suffisante pour passer l'amorce transpa- 
rente de la cassette I 

,— C'est tout d'abord l'enregistrement de 
ce que l'on appelle l'étiquette du pro- 
gramme (ou du fichier) : on y trouve la 
vitesse 1000 ou 2000 bauds, le type 
(BASIC, BASIC protégé, binaire ou 
ASCII), le nom de baptême et la taille 
exact en octets, d'où le nombre de 
"blocks". 

— La succession des blocks de 
2048 octets maxi. Chacun débute par 
une mini-étiquette rassemblant le nom, 
le numéro de block et sa tailte exacte. 
Pour nos 5000 octets, on aura donc 
deux blocks complets, plus un troisième 
pour les 1000 octets restants. 

A la lecture, même scénario, mais à la 
fin de chaque block, l'ordinateur vérifie 
que le nombre d'octets entrés est égal 
à ce qui était annoncé dans l'étiquette, 
sinon il affiche "read error". 
A la fin du dernier block se trouve un 
signal de fin : il sera exécuté s'il n'y a 
pas eu de "read error" dans un des 
blocks. Si c'est malheureusement le cas, 
le magnéto continuera de tourner après 
cette fin non validée. Conclusion, si un 
"read error" apparaît, il est inutile de 
poursuivre le chargement, c'est sans 
appel I 

A présent, parlons des disquettes : 



Constitution d'une disquette 3" 

Dans le boîtier se trouve un disque de 
plastique enduit sur ses deux faces, 
découpé à l' emporte-pièce. Sa "rigidité" 
est à peu près celle du papier de cette 
revue. Des feutres de guidage assurent 
une pseudo planéité. Il comporte deux 
trous, un central renforcé par un solide 
moyeu d'entraînement et un petit excen- 
tré, d'environ 3 mm de diamètre, qui va 
servir à repérer le début de chaque tour 
(par une cellule photo-électrique). 
Insistons sur le fait que ce disque magné- 
tique est uniforme, comme une feuille de 
papier non ligné. Le fabricant ignore le 
nombre de pistes que vous désirez y 
mettre, c'est à l'utilisateur de tracer ses 
pistes, c'est le rôle du FORMATAGE : 
Celui-ci va tracer 40 pistes de guidages 
concentriques et sur chacune, neuf repè- 
res de SECTEURS ; la position du petit 
trou permet alors de numéroter ces sec- 
teurs. Le drive peut alors écrire sur cette 
face de disquette formatée. Un secteur 
peut contenir 512 octets. Calculons la 
capacité d'une face de disquette : 
512 x 9 x 40 = 184 320 octets, ce 



qui, divisé par 1024, donne 180 kilo- 

Le principe physique de la magnétisation 
de ces aimants microscopiques, enrobés 
dans le vernis de la disquette, est fon- 
damentalement différent du principe des 
bandes : au lieu de lire des variations 
continues de forces d'aimantations, on 
se contente ici d'observer des change- 
ments brutaux de polarités magnétiques, 
"nord" ou "sud". C'est plus compliqué 
que cela mais je simplifie... Avantage, la 
vitesse est de l'ordre de 1 20 000 bauds, 
soixante fois plus rapide que sur bande I 

Les trois types da formatages 

La commande FORMAT sous CPM va, 
après formatage, enregistrer sur les deux 
premières pistes un programme de 9 kilo- 
octets que l'on appelle "SYSTEME" ou 
"DOS" ou "CPM". Il va compléter 
l'AMSDOS résidant dans les CPC 664 et 
61 28 où l'interface drive des 464. Grâce 
à cela, nous pourrons taper des ICPM. 
On dit que cette face de disquette est 
"formatée Système". Certes, on a perdu 
9 kilo-octets, mais c'est vivement 
recommandé par l'auteur, prudence 
oblige... 

FORMAT V (V comme Vendeur) a peu 
d'intérêt pour nous : c'est idem 
"système" mais sans l'enregistrer tout 
en RESERVANT SA PLACE. On pourra 
le transférer ensuite par le programme 
SYSGEN de la disquette CPM. Pour- 
quoi ? Parce que si le Système est indis- 
pensable sur tel logiciel du commerce, 
l'éditeur n'a pas le droit de le "vendre" 
avec son produit ; c'est è l'utilisateur 
final d'y copier le sien. Une des lois sur 
le COPYRIGHT ; sans commentaires. 

FORMAT D donne une disquette forma- 
tée DATA. Toute la place est disponible ; 
tous les logiciels du commerce sont for- 
matés DATA. Mais pour les nôtres, qu'il 
s'agisse de programmes ou de fichiers 
personnels, je vous déconseille forte- 
ment cette fausse économie car un jour 
vous serez piégé par l'absence du 
Système. Impossible de le rajouter 
ensuite par SYSGEN. Vous pourrez cal- 
culer que ces 9 Ko si souvent utiles 
représentent un "gaspillage" de 75 cen- 
times par face ; donc une très mauvaise 
économie. 

Quand au FORMAT I "conforme IBM 
PC" j'en cherche encore une application 
pratique, car cela concerne les disquet- 
tes IBM PC formatées en CP/M (jamais 
vues !) et comme ces micros utilisent les 
formats 5" 1/4 ou 3" 1/2... 



Le catalogue d'une disquette 

C'est la table des matières, le descriptif 
de tout ce qu'il y a sur une face de dis- 
quette. Le catalogue se réserve 2 kilo- 
octets ; c'est pourquoi il reste 
180 - 2 = 178 Ko sur une disquette 
formatée DATA et 180-2-9 = 
169 Ko sur une formatée Système, 



Il se loge sur la première piste d'une dis- 
quette DATA, mais A LA SUITE du pro- 
gramme Système si la disquette a été 
formatée Système ou Vendeur. 
Cette plage réservée correspond à un 
maximum de 64 noms de programmes 
ou fichiers. Chacun d'entre eux est réfé- 
rencé comme suit : 

- Le numéro de USER (généralement 0) 
qui est une sorte de classement par 
groupe, utile avec disque dur mais de peu 
d'intérêt sur disquette. 

- Le nom du fichier, ainsi que certains 
paramètres optionnels, BASIC protégé, 
non effaçable par ERA, invisible par CAT 
ou DIR, etc. 

- Enfin, la LOCALISATION, les numé- 
ros de pistes et de 
enregistré. 



Vous avez sans doute été surpris par le 
fait qu'un enregistrement môme très 
court occupe 1 kilo-octet lorsque l'on 
tape CAT. L'explication est que le CPC 
enregistre par BLOCS da 1024 octets, 
soit deux secteurs à la fois. (Cela rappelle 
la sauvegarde sur cassette par "block" 
de 2 kilo-octets). Supposons 1 5 fichiers 
de 24 octets ; ils feront 1 5 titres de 1 
Ko, mais sur la disquette, il y aura ainsi 
1 5000 octets "gaspillés", car les com- 
pléments de blocs sont en quelque sorte 
remplis par des "blancs". (Même chose 
sur cassette pour le dernier block). 




La gestion de la disquette par CP/M 

Comment se passe un effacement de 
fichier par ERA ? Ultra simple : dans le 
catalogue, le numéro de USER devient 
229, c'est tout I Deux conséquences : 
le nom n'apparaît plus par CAT ou DIR. 
Le contenu du fichier ou programme est 
toujours intact, mais les zones qu'il 
occupait sont désormais disponibles 
pour d'autres sauvegardes, lorsque la 
place sur disque deviendra insuffisante. 
Il est alors possible de ressusciter un 
fichier effacé par erreur en remplaçant ce 
229 par 0, (sauf s'il a été écrasé par 
d'autres sauvegardes) ; par exemple, 
avec le bon vieux logiciel "ODDJOB". 
Lorsque l'on a fait le ménage en effaçant 
de nombreux petits programme pour y 
loger un gros, on devine alors que ce der- 
nier va "boucher les trous" çà et là, il 
peut être fragmenté, éparpillé sur des 
pistes non consécutives. Ce n'est pas 
très gênant, au plus un léger ralentisse- 
ment pour le chargement. 
Ceci amène une remarque concernant la 
confidentialité : il est arrivé qu'une per- 
sonne serviable se trouvant à court de 
disquettes vierges pour délivrer une 
copie d'un petit programme, prenne un 
double de disquette très confidentielle et 
en "l'effaçant" d'abord par ERA *.* : Si 
le destinataire est du genre curieux, il lui 
faudra moins d'une minute pour remet- 
tre au catalogue la plupart des titres effa- 
cés. Rappelez-vous que la seule méthode 
pour effacer réellement une disquette est 
de la reformater. 



Une disquette au contenu précieux doit 
être dupliquée. On ne sait jamais quel 
malheur il pourrait arriver â un exemplaire 
unique... L'autre cas est une copie pour 
un ami. Pour cela, il faut faire la distinc- 
tion entre deux méthodes ; la copie 
"physique" et la copie "logique" : 

— La copie physique est comparable à 
une photocopie de l'original, car c'est 
une reproduction fidèle secteur par sec- 
teur. C'est ce que l'on obtient par DISC 
COPY ou par certains logiciels de 
"copies autorisées" tels que ODDJOB, 
HERCULE, DISCOLOGiE, etc. Avantage, 
c'est très rapide et le formatage de la 
copie est simultané. Inconvénient, la 
copie conserve les séquelles de l'original, 
à savoir les fichiers "effacés" et les 
éventuelles dispersions d'un fichier un 
peu partout sur la disquette. 

— La copie logique ou "séquentielle" 
consiste à recopier les divers titres un par 
un sur une disquette préalablement for- 
matée. C'est plus long, mais c'est plus 
"propre". En effet, on peut faire une 
copie sélective au totale des titres et les 
fichiers "dispersés" se retrouvent alors 
"recompactés". C'est le cas du FILE- 
COPY *.* du CP/M ou COPYFILE ou PIP 
si vous possédez un second drive. Deux 
remarques : les fichiers "cachés" (non 
visibles par CAT ou DIR) ne sont pas 
copiés. Certains logiciels plus perfor- 
mants que FILËCOPY exigent que l'ori- 
ginal soit formaté Système. 



Les incompatibilités e 



a les CP/M 



Même chez AMSTRAD, il existe plu 
sieurs versions de Systèmes CP/M (ou 
DOS = Disc Operating System) et la 



compatibilité entre elles est loin d'être 
parfaite ! ISi cela peut vous consoler, 
c'est bien pire encore chez les IBM PCI . 
Avec le CPC 464. nous ne disposons que 
du CPM 2.2, tandis que le CPC 61 28 est 
livré avec CPM 2.2 et CPM PLUS. Le 
PCW ne possède que ce dernier. La ver- 
sion "PLUS" est plus étoffée que la 
"2.2", mais le drame vient du fait que 
sa façon d'écrire et de formater soit légè- 
rement différente ; bien qu'il s'agisse 
toujours de 40 pistes en 9 secteurs. 
Un 464 a du mal à lire une disquette 
créée sous CPM PLUS. Le possesseur 
d'un 6128 en usage général a intérêt à 
adopter le CPM 2 2 et ce, pour pouvoir 
profiter d'échanges avec les possesseurs 
de 464. Réserver le CPM PLUS pour des 
échanges de fichiers ASCII avec des 
PCW ou pour se livrer à des "magouil 
les du second degré" avec le DOS. 




C'est terminé pour les connaissances 
théoriques, abordons les astuces pour 
mieux assurer nos sauvegardes : 

L'organisation des cassettes 

Pour un début de cassette, il est conseillé 
de démarrer la sauvegarde sur le COL- 
LAGE amorce-bande, en bobinant à la 
main à l'aide d'un corps de stylo, sinon 
l'enregistrement commencera sur cette 
amorce. En revanche, il est dangereux de 
confier ce bobinage au magnétophone 
car, étant très imprécis, la lecture pour- 
rait commencer par le début d'une "éti- 
quette" obsolète avant de lire la bonne... 
Lorsque l'on enregistre plusieurs petits 
programmes indépendants sur une 
même cassette, tout en notant les repè- 
res compteur pour les retrouver, la grave 
erreur est de les mettre immédiatement 
à la suite les uns des autres. Deux rai- 



sons 



:ela : 



garde se termine sur "36", faites la sui 
vante à partir de 50. Ainsi pour rechar 
ger ce titre, il suffira de se positionner 
"un peu avant 50". Remarquez que lais- 
ser tourner de 45 à 50 prend moins de 
temps que dB fignoler un positionne 
ment. D'autant plus que Ibs repères du 
compteur ne sont pas d'une fidélité 
remarquable... 

Ne pensez pas au petit gaspillage que 
cela représente, car de toute façon, vous 
n'auriez pas rempli cette C 60. De 
même, n'utilisez pas la face B : déjà 
qu'un programme sur cassete est long 
à charger, si on y ajoute encore le temps 
d'un rebobinage complet I 
Si vous enregistrez sur un magnéto exté- 
rieur stéréo ICPC 664 et 61 281 pour lire 
sur un 464, il vous faut relier ensemble 
les canaux gauche et droite Sans cette 
précaution, le signal ne sera que sur la 
voie gauche ; or, le 464 lit les deux pis 
tes et s'il reste sur la voie droite de la 
musique que vous aviez cru effacer par 
ce SAVE... 

Possesseur d'un 464. vous tapez un long 
programme bien sûr, vous en faites une 
sauvegarde tous les quarts d'heures au 
cas où... (surtout par temps d'orage). 
Mais il serait absurde de reprendre cha- 
que fois le même début de cassette 
imaginez une coupure de courant en 
cours de sauvegarde- Que restera-t-il ? 
Rigoureusement rien I 
Deux méthodes au choix : ou bien on a 
deux cassettes utilisées alternativement 
laprès rebobinage) ou une seule où l'on 
prend toujours la suite, mais en notant 
chaque fois le repère compteur du 
départ. Le risque est de ne plus savoir où 
est la toute dernière version. Alors plu- 
tôt que de retaper chaque fois SAVE 
"MACHIN", prenez l'HEURE comme 
nom. Ainsi, SAVE "1506" signifiera 
sauvegardé à 1 5 heures 06 minutes ; 
"MACHIN" sera pour la version etéfini- 



— le pré-positionnement précis par le 
compteur est long à réaliser. 
Laissez plus de 10 unités de compteur 
entre deux titres et démarrez sur des 
multiples de 10. Exemple, une sauve 



L'organisât io 



s disquettes 



Il est très difficile d'écrire sur le papier 
trop glacé des étiquettes de disquettes, 
surtout les AMSOFT Pour que le stylo- 
bile ou le crayon "prennent", gommer 
Anergiquement ce papier avant d'écrire ; 
ou collez par -dessus une étiquette adhé- 
sive au papier bien mat Pour faire vos 
étiquettes à l'imprimante voir "CPC" n" 
25 page 62. 

Si vous aimez programmer, réservez- 
vous une disquette spéciale que vous 
nommerez "TRAVAIL". .C'est l'établi sur 
lequel on tape le nouveau programme, où 
il ne sera d'ailleurs qu'en transit, les 
autres titres y sont à demeure car ce sont 
vos programmes d'aide à la programma- 
tion, ainsi que les sous -programmes uti- 
litaires que l'on recharge par MERGE. Le 
gain de temps est alors considérable. 
IVoir du même auteur "PROGRAMMES 
UTILITAIRES POUR AMSTRAD, SORA- 
COMI. 

Le CAT sur telle disquette montre une 
vingtaine de titres dont la plupart sont 
des sous-programmes ou des fichiers. 
Comment repérer les quelques "noms de 
lancements" sur lesquels on fait RUN ? 
(Ne vous fiez pas à votre mémoire...!. Il 
suffit de les renommer en mettant 
comme premier caractère le signe moins. 
Ainsi, TRUC. BAS deviendra -TRUC.BAS. 
Et comme CAT affiche les titres par ordre 
alphabétique, ils seront regroupés en tête 
de liste. ,-JtA-jU^ 



Reprenons le problème précédent de sai- 
sie de listing. Là, il faut DEUX disquet- 
tes distinctes. Ne comptez pas trop sur 
les versions .BAK à cause de la loi de 
MURPHY (la loi de l'em. . maximum) : si 
une coupure survenait lors de la ré- 
écriture du catalogue, on perdrait toute 
la disquette I Ici encore, prenez l'heure 
comme nom. 

Ne mettez pas un point d'honneur à rem- 
plir complètement vos disquettes, 15 
kilo octets disponibles par face est un 
minimum Songez que vous serez un jour 
amenés à modifier l'un d'eux et qu'il est 
grotesque d'être bloqué par un "dise 
fuit" parce que l'on n'avait pas prévu 
l'encombrement du .BAK... 
Sur le carton des boîtiers de disquettes, 
vous notez le contenu de chaque face ; 
mais inscrivez aussi AU CRAYON les 
kilo-octets encore disponibles. Cela sera 
très utile pour savoir sur laquelle vous 
allez loger ce programme de 37 Ko. 




Conclus! 



C'est une évidence de dire que pour être 
un bon automobiliste, il faut avoir assi 
mile quelques notions de mécanique 
générale, même si elles ne sont que 
superficielles. Il en va de même en micro- 
informatique car il n'y a rien de plus frus- 
trant, démotivant, que de perdre bête- 
ment le fruit de nombreuses heures de 



. Pire t 



t pas 



pourquoi I Ces quelques notions vont 
souvent "faire réfléchir avant d'agir", 
mais vous permettront aussi de créer vos 
propres "astuces de sécurité". 
Certaines de mes "explications techni- 
ques" ont été volontairement très sim- 
plifiées, ce qui va encore m'attirer les 
foudres de certains universitaires puris- 
tes... Le but était d'être compris par tous 
ceux qui veulent avoir confiance 
lorsqu'ils tapent un SAVE 
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INITIATION A CP/M 



Francis VERSCHEURE 



Nous voici donc arrivés à 
l'étude de la fonction 50, 
présente, rappelons-le, 
uniquement en CP/M Plus et 
destinée à un interfaçage 
"propre" avec le BIOS. Le 
mécanisme d'appel est très 
simple et utilise une zone 
de travail qui contient les 
différents paramètres dont 
voici la description : 

— 1 octet : numéro de la 
fonction BIOS à rappeler 

— 1 octet : contenu du 
registre A à passer au BIOS 

— 2 octets : contenu du 
registre BC 

— 2 octets : contenu du 
registre DE 

— 2 octets : contenu du 
registre HL 



En entrée C - 50 DE = adresse de la 
zone de travail contenant les paramè- 
tres. 

En sortie : A contient le code retour 
éventuel de la fonction BIOS 
Mais quelles sont les fonctions BIOS > La 
figure 1 vous donne la liste utilisant les 
abréviations standard des noms de ces 
fonctions. Notre propos n'est pas de 
vous les décrire toutes, car d'ailleurs la 
plupart ne sont que des appels aux péri 
phériques permettant d'effectuer physi- 
quement les fonctions du BDOS de 
CP/M. 

Nous allons voir dans le détail les fonc- 
tions du BIUS se rapportant aux opéra 
tions sur disquettes, car celles-ci sont 
parfois utiles et ne font pas double 
emploi avec les fonctions du BDOS qui 
opèrent sur des fichiers. 

Les fonctions "disquettes" 
du BIOS 

HOME ■ positionne la tête de lecture du 
lecteur courant sur la piste 
SELDSK : sélectionne pour toutes les 
fonctions "disque" suivantes le lecteur 
qui sera concerné. Le numéro du lecteur 
est passé dans le reyistre C avec pour 
A:, 1 pour B: etc. 
Par précaution mettre B à zéro. 
Registre E à force la sélection, c'est- 
à-dire la relecture de la disquette Indis- 
pensable pour ne pas avoir de problème 
lors d'un changement de support. 
Renvoie dans HL adresse table DPH du 

SETTRK : sélectionne le numéro de piste 
passé dans le registre C 
SETSEC : sélectionne le numéro du sec 
teur passé dans le registre C 
SETDMA : sélectionne l'adresse du 
transfert disque passée dans registre BC 
READ : lecture du secteur physique 
déterminé par numéro piste'numéro sec- 
teur à l'adresse passée par SETDMA 
Code retour dans A. 
WRITE : écriture d'un secteur physique. 
Code retour dans A 



Utilitaire simple 

de lecture/écriture physique 

d'une disquette 

La fonction 50 va nous permettre 
d'écrire simplement et proprement un 
petit programme qui, en liaison avec DDT 
ou SID nous permettra d'examiner une 
disquette en y accédant au niveau physi 
que, c'est-à-dire piste/secteur. 



ail c 






une disquette comporte 40 pistes, 

mérotées de à 39 

chaque piste est décomposée en 9 
de 512 octets. Quel que soit le 
formatage de la disquette, système 
CP/M ou données seules, pour le BIOS 
les secteurs sont toujours numérotés de 
Oà B. 

Donc, chaque lecture vous permettra de 
visualiser 4 "secteurs CP/M" de 128 
octets. 

La figure 2 vous donne la liste du 
programme 

Après avoir saisi le texte source, vous 
devez en effectuer l'assemblage par 
RMAC ou ASM, suivi du LINK ou du 
LOAD. Si vous n'avez pas fait d'erreur, 
les zones suivantes se trouveront aux 
adresses ci dessous : 

DISQUE 226H 

PISTE 227H 

SECTEUR 228H 

BUFDSK 240H 

LECTURE 100H 

ECRITURE 109H 

FIN 10FH 



Comment maintenant utiliser cet utilitaire 
appelé, par exemple, DUMPDSK ? 



= SID. 



I exemple 



SID DUMPDSK.COM chargement 
du programme en 100H 

S226 pour visualiser et modifier les 
valeurs des paramètres DISQUE, PISTE 
et SECTEUR 

Puis G 1 00, 1 F pour effectuer une 
lecture ou 

G109.10 F pour une écriture. 
D230 vous visualisera le buffer conte- 
nant le secteur physique qui débute en 
240H et finit en 43FH. 

Précautions d'emploi : il est impératif, 
pour ne pas avoir de problèmes, de ter- 
miner l'utilitaire par un CTRL + SHIFT 
+ ESC pour effectuer un redémarrage 
à froid. 

Voilà, vous avez maintenant ce qu'il 
vous faut pour percer à jour les mys- 
tères du catalogue ou plus intéressant 
pour récupérer un fichier perdu. Bien 
sûr, rien ne vous empêche d'améliorer 
l'utilitaire pour le rendre indépendant. 




Les fonctions du Bios de CP/M Plu: 



WBODT 

CDN5Ï 

CÛNIN 

CONÇUT 

LIST 

flUKDUT 

RLtXlN 

HOME 

SELDSK 

5ETTRK 

SETSËC 

SETDMfl 

REflD 

WRITE 

LISTGT 

SECTRM 

CONOST 

flUXIST 

PHJXGST 

DEVTBL 

DEVINI. 

QRVTBL 

WULTIO 

FLUBH 

MOVE 

TIME 

BEL ME M 

SETBNK 

XMOVE 



Utilitaire disque pour CP/M Plus. 

BDQB eau 5 

PRINTS ?ou 9 

BIOSCOLL eau 50 

SELDSK eau 9 

SELTRK eau 1B 

SEL5EC eau 11 

SELDMA eau 12 

RD5ECT eau 13 

WRSECT eau 14 



Fonction BDOS (nooei BI05 



Ci BIOSCftLL 
«, SELDSK 
BIOSF 
DISQUE 
BIOSBC 

BIOBBC+1 
SIOSDE 
d, BIOSF 
BDOS 



Retour a DDT ov SIS 
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PHCENIX 

Stéphane LOUET 




II est particulièrement rageant de perdre des heures de dur labeur 
à cause d'une erreur d'inattention : vous venez de taper I era, 
'"*.*" à la place de I era,"*.BAK". Ce programme répare en 
un clin d'œil les disquettes effacées par inadvertance. Il fonc 
tionne sur tous les CPC et accepte les formats SYSTEM, VEN- 
DOR, DATA & IBM. Un directory saturé, c'est-à-dire contenant 
64 fichiers est régénéré en moins de trois secondes ! temps 
d'exécution sur catalogue "normal" : une seconde). Une petite 
étoile permet de suivre le déroulement du programme : lecture 
du directory (phase la plus longue), réparation et sauvegarde 
du nouveau directory. PHOENIX constitue donc un garde-fou 
pour les programmeurs distraits. 



Le nom d'un programme est stocké dans le catalogue avec les 
adresses des secteurs que doit charger le CPC pour l'exécuter. 
Ces adresses sont codées logiquement en blocs pour occuper 
moins de place L'octet précédant chaque nom de fichier vaut 
&E5 s'il est effacé. PHOENIX charge donc les 4 secteurs du 
directory à l'aide de l'instruction &84 de la Rom-disque, rem- 
place les octets statuts d'effacement &E5 par puis sauve enfin 
le nouveau directory (instruction &85). 

N.B : POKE &A027, 1 permet de Bavi 
tion, les routines d'erreur disque ne s 



El 

.e directory est situ 


îments techniques 

sur des pistes différentes selon le format 


FORMAT 


PISTE SECTEURS 


SYSTEM 

VENDOR 

DATA 

IBM 


2 
2 


1 


41 -> 44 
41 -> 44 
C1 -> C4 
01 > 04 



L0 iF HIMEM-. JùBb3 THEN EVMBOL fiFTER 120:f-EH0RV iBFFFîS -' 
rMBOL 123,ib«,JlÛ,^7B,!,C.!,7C.KC^7È:3Vt1E0L 1 25. t.. S. ?<3C 
.fc66,ïi7E.!i6â.fcïC:]l*' Mis BORDER Hïll* Ï.SsFQR i=SrflW9 

TD MOBBiREAD atiPÛKE i,vAL! ,l 5"*aî);fJEÏT:PEN 1 EL5E f'D 

20 a*=CHR* 1149): PAPER «: MODE 2 iPRINT" PHOENIX Y9.1 - "CH ;:■ 

R4I164I" SDphane LQUEI 19B7 . Rlparation automatique rJ 

s 0;rectory. " 

38 PQKE &BE7Ë.255:P0KE fcBE66,2:PRINT:PRINT:PRINT"In5ÎrB îi 

i la disquette { rlqïnJrer puis presse; une touche:_"CH 

RïU«);;CfiLL SBSmSSl &£BeàîPRI«T CHRilBl" " 

40 WINDBW 3e,5ô,B,lù:PRINT CHR$il50)STRINGSil9, 1541CHR» & 

U56)a*SÎRINE$(19,32)aSa*" LeCture "aîaî" R 

iparation.. "aîaï" Ecriture.... "alatSTRIMGtd 1 ? 
. 32) a$CHRS ( 147) STRIMEt (17. 154>CHRl 11531 :LQCATE 17.3:FRI 
HT"*' 

50 WINDBW 1.3Û,6,fc:CALL &AM0:WIND0W 1 . 3Û. 1, 25ï LOCATE 1 3 
,6:FRINT 5TRINE$i21.32) 

S0 a=FEEMàBE74i:IF a=tC4 THEN PQKE iA029.w ELSE IF s-h ï-lS 
44 THEN POKE WW29,2 ELSE iF a=4 THEN PBKE (.A029.1 ELSE 
2ti 

7Ô SOSUB WsPfflE ^BE7B,e:L0CATE 46, lOiPRIMT" ":LDCATE 4 (f 
6,lirPRM'*"::F0R 1^9001 TO &9B00 STEF 32: IF FEEIUi> = 
ÎE5 THEN 80 ELBE POKE j-l,9:NEXT 

80 PRINT CHRKB)" "CHRÎIIÛICHR* (8! "<";WIND0W 1,32,17,28 fii» 
:P0KE IA033.!,B5:E05UB 90:CLS:W1NDDW i.EW, I,25:LDCAÎE 1, 
17:PRINT ,p R>g}n>ration achev)e. . . ": END 
90 FOR i=l TD 4:P0kE M02B,a+i-4;POKE &A02E,2mtaE:CAL '■' 
L ftA01B:NEXT:RETlJRN 

106 DATA 21,i7,A0,ll,a,6e t 6,l,CD,Br:,BC,FE,9a,2a,51,FE,C ..< 
4,2B,i2,CÛ,8F,BC,C9,41,21,33,fiB,CD,D4,BC,Di:',22,ï4,fl0,79 
,32,36,AO,lE,e,lt,l,E l Cl,21,0,9e,DF,34,AÔ,C9,B4,0,0,Û,7 
, 44,69, 73, 71, 75, 65,74,74, 65, 20, 61, 62, 73, 65, 6E, 74, 65, 2E, 
7, 44,69,72, 65, 63, 74,6F, 72, 79, 20, 69 

110 DATA fcE, 65,78, 69, 73,74,61, ÙE, 74, 2E,21,3Ê.A0,2Ï,7E.C P0 
D.5A,BB,FE,2E,20,F7,CD,e,BB,CD,6,EB,C3,0,Hti,21,49,A0,23 
,7E,CD,5fi,BB,FE,2E,28,3,C3,78,A0,CD,iJ,ER,CD,6.BB,E9,8« 
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L'IMPRIMANTE 
CITIZEN 120 D 

VERSION AMSTRAD 



Bernard PO/SOT 



Les imprimantes sont des 
périphériques qui ont largement 
profité des divers progrès 
technologiques. 
La C 120 D est l'une de ces 
imprimantes modernes. Deux détails 
non négligeables : son prix, de l'ordre 
de 2000 F, soit un peu plus que la 
célèbre imprimante AMSTRAD DMP 
2000 et sa possibilité de s'adapter à 
de nombreux ordinateurs courants 
par simple échange de la carte 
d'interface, ce qui peut intéresser les 
clubs, par exemple. 



Caractéristiques : 

Matrice d'impression à 9 

points, dont seulement 7 

, sont habituellement utilisés 

| sur les CPC, le port de l'im- 



primante ne transmettant 
que 7 bits. Une possibilité 
nous est offerte de 
der par logiciel I 



luilièi 



:. Cela 



s per- 



I met de résoudre partielli 
ment le problème du hu' 
tième bit et d'accéder au gra 
phisme 8 
huit densités graphiques per 

I mettent les résolutions sui 



Les 



vantes, en nombre de points 
par ligne : 

480, 576, 640, 720, 960, 
1152, 1920. 

A noter que le mode 9 aiguil- 
les ne permet que les modes 
simple et double densités, 
c'est-à-dire 480 et 960 
points. Ces divers modes 
permettent de trouver le 
meilleur compromis qua- 
lité/rapidité ou les meilleures 
proportions en recopie gra- 
phique d'écran. 



■ 





I Vitesse d'impression . 1 
caractères par seconde 
I qualité normale, et 24 
, tères par seconde en qualité 
| courrier. L'impression est 
bidirectionnelle optimisée 
pour les qualités normales, 
| c'est à-dire que le mouve- 
ment de la tête s'effectue de 
a manière la plus rationnelle 



en fon. 



lents 



ligne 



itlles. Uni 



mande est prévue pour forcer 
le fonctionnement unidirec 
tionnel si nécessaire, une 
| autre pour faire reculer la 
tête, par exemple pour a|ou 
ter Lin accent sur une lettre. 

Jeux de caractères en plus 
des 96 caractères standard, 
elle possède 1 1 |eux de 12 
caractères nationaux, les 
caractères graphiques et 
tymlinles spéciaux IBM et 
EPSON II nous est possible 



défin 



ous-r 



jusqu'à 94 caractère: 

a malheureusement pas les 

caractères graphiques du 

CPC. 

Type d'écriture . à la mise 
sous tension, la C 120 écrit 
en PICA, sur 80 colonnes, 
mais il est possible d'obtenir 
l'écriture ELITE, l'italique 
avec expansion ou compres 
sion. ce qui nous donne le 
choix entre 40, 48. 68. 80, 
96, 136 et 160 colonnes. 
Elle connaît le mode inverse 
(blanc sur fond noirl, les indi 
ces, les exposants, les carac 
tères gras, la douhle frappe 
et, bien sûr, la qualité cour 
rier. le surlignement. le sou 
Lgnement et la double 
hauteur 



Formatage des pages : d< 
nombreux paramètres con 
nt les formats 

1 qrammables Ainsi, l'on peut 
déterminer l'interligne, l'es- 

I pacement des caractères, la 
longueur rie page (en nombre 
de lignes ou en pouces!, les 
marges haut bas/droite- 
gauche, les tabulations hori- 
zontales et verticales qui sont 
soit absolues, dont toujours 
aux mêmes lignes, soit rela- 
tives, par rapport à la position 
actuelle de la tête. Il est pos 
sible de mémoriser simulta- 
nément 8 modèles de tablu- 
talions verticales, ce qui 
s'avère très utile pour l'édi- 
tion de formulaires de for 
mats différents dans une 
même application L'espace 
ment des caractères peut 
être proportionnel. L'aligne 
ment des textes, appelé jus 
tification, peut se faire à 
droite, à gauche ou des deux 
côtés à la fois, la machine 
modifiant dans ce cas la 
valeur des espaces entre 
chaque mot 

Panneau de commandes 
nous y trouvons les trois 
classiques touches de sélec 
don en ligne/hors ligne, 
d'avance d'une ligne et 
d'avance d'une page, ainsi 
que les voyants marche, fin 
de papier (il n'y a pas de 
signal sonore) et prêt. Les 
touches ont également des 
fonctions plus intéressantes. 
Files permettent de choisir 
divers modes de fonctionne- 
ment tels que l'impression 
complète du jeu de caractè 
res, un test de mémoire et 
ri alignement de la tête, de 
même que le choix d'un type 
d'impression parmi les 5 sui 
vants : PICA qualité courrier, 



[ italique, caractères gras et 
compressé La dernière pos- 

I sibilité offerte par ces tou- 
ches est le mode d'affichage 
transparent hexadécimal. 
Cela signifie que l'imprimante 
n'interprète aucune corn 
mande, elle se contente d'im- 
primer la suite des valeurs 
que le CPC lui envoie, d'une 
part en hexadécimal et d'au 
îre part en clair, c'est-à-dire 
les caractères correspondant 
aux codes Autre caractéris- 
que intéressante : lorsque les 
valeurs correspondent à des 
codes de contrôles, elle affi 
che l'ahréviation de ce code 
mais le mode d'écriture com- 
pressé rend la lecture 
difficile. 

Sélecteurs de mode ! un 
ensemble de 8 mini-interrup 
teurs situés sur l'interface et 



mise sous tension On notera 
que ces options peuvent éga- 
lement être sélectionnées par 
programme en cours d'utili- 

L'interface en question est 
un ensemble de circuits élec- 
troniques qui fait l'adaptation I 
des signaux électriques entre 
l'ordinateur et l'imprimante. 
Elle se présente sous forme 
d'un boîtier muni d'un con- i 



qui s'ir 
de 



imprii 



C'est l'échange de cette 
interface qui permet la corn- I 
patibilité de la C 120 avec 

Type de papier : on utilise ' 
soit des feuilles ordinaires, ! 
soit du papier à picots. Le ' 



Impressioi 

graphique 

en 1920 

points 



\ mm 




I passage d'un type à l'autre 
se fait en installant le guide 
I approprie. Le papier en bande 
peut s'introduire par l'arrière 
: ou par le dessous de l'impri- 
| mante Un chargeur feuille à 
I feuille est disponible en 

option 
I Entretien : la durée de vie du 
I ruban est de 2 millions de 
caractères (l'ouverture de la 
cartouche du ruban a révélé 
qu'il est très long) et la tête 
d'impression est annoncée 
pour 100 millions de carac- 
tères. La moyenne rie temps 
de bon fonctionnement est 
I de 4500 heures pour le reste 
de la machine Aucun entre- 
! tisn n'est requis et il suffit 
d'éviter la poussière et 
l'humidité. 

Notice : la notice est en vrai 
français, c'est dire qu'elle est 
exempte des erreurs que l'on 
voit trop souvent dans les 
modBS d'emplois lorsque la 
traduction est bâclée. Elle fait 
souvent référence à de nom 
breuses marques d'ordina 
teurs, mais jamais à AMS- 

j TRAD. A croire qu'AMS- 
TR AD n'existait pas lors de la 

I rédaction du manuel, Cela se 
confirme d'ailleurs par l'ajout 

i d'une mauvaise photocopie 



appareils, mais présente un 
petit défaut : vu que le con- 
necteur peul se brancher 

indique que le cable de liaison 
comporte un fil de couleur 
sur l'un des côtés, ce qui va 
nous servir de repère pour 
trouver la bonne orientation 
de la prise. Mais ô malchance 
(ou plutôt manque de sérieux) 
le câble en question com- l 
porte un fil de couleur de 
chaque côté. Le peu d'infor- I 
mations que nous apporte 
cette photocopie est donc 
inutile car le repérage n'est 
plus possible Voici comment 
procéder, pour ceux qui se , 
trouveront face à cette situa- 
tion : l'intérieur de la prise qui 
se branche sur l'imprimante 
comporte quelques numéros. 
Le fil qui porte le numéro 1 
est alors identifié et c'est ce 
fil qui doit se trouver à gau- 
che du CPC lorsque nous le 
voyons côté clavier. Une fois 
le branchement vérifié, vous 
avez intérêt à repérer le côté 
HAUT du câble len l'écrivant 
ou en collant une étiquette 
sur le connecteurl, pour ne 
plus avoir ce problème si 



■ous devez la dêbra 



Mémoire tampon lou but- 



ter) : 






4 kilo-octets. Des comman- 
des permettent de la vider, 
d'effacer le dernier caractère 
ou d'effacer une ligne. 

Conclusion 

La CITIZEN 1 20 D comporte 
de nombreuses qualités, 
dues à son développement 
récent, qui sont : la facilité 
d'accès et déchange des 
pièces sujettes à usure, la 
facilité d'introduction du 
papier et de mise en place 
des systèmes d'entraîné 
ment, la rapidité, la qualité et 
la diversité d'écriture, la 
capacité de la mémoire tam- 
| pon, la possibilité de redéfi' 
nir des caractères, le large 
éventail de possibilités diver 
I ses, un bruit acceptable, un 
prix concurrentiel et la com 
patibilité multiple. Son défaut 
majeur est de ne pas être 
totalement compatible avec 
I les CPC. Les codes de com 
1 mandes du BASIC AMS- 
| TRAD ayant des significa 
tions différentes de ceux de 
l'imprimante, cela provoque 
quelques désagréments Si 



par exemple, vous utilisez le 
code 24, commandant l'in- 
version des couleurs, obtenu 
par le caractère CONTROL et 
symbolisé par un X souligné 
et surligné, vous provoquerez 
l'effacement de la ligne lors 
d'un listing car CHRS124) 
commande à l'imprimante un 
effacement de ligne. De plus, 
les caractères graphiques 
propres aux CPC n'existent 
pas. Il faut dire qu'ils ne sont 
, de toute façon pas 
par le port imprimante 



pu I 



; utllls 



t de même 
lieu, par 
du jeu IBM La i 
compatibilité C120CPC ne 
se justifie que par le fait que i 
les deux appareils travaillent I 
au standard EPSON, ce qui 
fonctionne parfaitement pour 
la plupart des logiciels du I 
commerce, y compris les uti- I 
litaires graphiques. L'impri- 
mante qui a servi pour ce 
banc d'essai a un défaut de 
taille . un décalage aléatoire 
entre les lignes lors d'utilisa- 
tion en mode graphique, 
Mais ce défaut n'est pas 
général à tous les modèles et 
si vous choisissez une CITI- 
ZEN, vériftez-le en deman- | 
dant un essai de recopie 
d'écran avant d'acheter» I 
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oui avons maintenant à notre dispo- 
sition tout un arsenal de possibilités 



pour résoudre nos problèmes : des fonctions, des procédures, mais H nous manque 
des outils pour faire exécuter une partie du programme plusieurs fois ou pour ne 
pas faire exécuter une autre partie en fonction d'un critère évolutif. Il nous man- 
que les instructions de boucles (les Itérations) et les Instructions de tests (les débran- 
chements). C'est à cela que nous allons consacrer cet article. 



LES INSTRUCTIONS 
DE DEBRANCHEMENTS CONDITIONNELS 

Elles sont au nombre de deux. La première est proche du ON 
<variable> GOTO xx,yy,zz,.... du BASIC, la seconde est pro- 
che du IF ... THEN ... ELSE, mais en beaucoup plus perfor- 
mant et en beaucoup plus agréable à l'œil, ce qui permet de 
faire des choses beaucoup plus complexes en toute simplicité 

Les concepteurs du langage PASCAL ont essayé de faire res- 
sembler leur langage avec celui que le scientifique utilise dans 
son langage courant, nous allons donc pouvoir "PARLER" le 
e PASCAL en français pour définir nos ordres, il nous 
a après de traduire cela en anglais et le tour sera joué. 



INSTRUCTION CASE 

Cette instruction est du type : SUIVANT QUE LE TEMPS EST : 
ENSOLEILLE ALORS J'IRAI A LA PLAGE, PLUVIEUX ALORS 
J'IRAI PECHER DES GRENOUILLES, NEIGEUX ALORS J'IRAI 
FAIRE DU SKI, DANS LES AUTRES CAS JE RESTERAI CHEZ 
MOI. Cette phrase peut bien sûr être représentée de façon 
plus parlante par le schéma de la figure 1 . Nous sommes déjà 
très loin des possibilité très sommaire du BASIC, mais PAS- 
CAL peut encore mieux faire. 

Il n'y a aucune raison pour limiter à une action ce que nous 
pouvons faire dans chacun des cas. Le début de ma phrase 
pourrait commencer par SUIVANT QUE LE TEMPS EST : 
ENSOLEILLE ALORS J'IRAI A LA PLAGE, JE ME BAIGNERAI, 



Figure 1 - 
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JE ME BRONZERAI, PLUVIEUX... La figure 2 rend compte de 
façon schématique de cette formulation. Pour un cas donné 
^ENSOLEILLER, nous avons trois actions à effectuer. La 
structure de BASIC ne permettait pas d'accomplir cet exploit, 
par contre PASCAL le permet grâce à sa notion de BLOC. 
Passons maintenant à la traduction en PASCAL TURBO et, 
pour cela, écrivons un programme qui admet en entrée un chif- 
fre et qui écrit sur l'écran le mois qui lui correspond en toute 
lettre (programme 11. 

Nous voyons que le mot clef qui introduit l'instruction est le 
CASE. Ce mot clef est suivi d'identificateur qui peut être de 
type INTEGER, BOOLEAN, CHAR..., mais qui ne peut pas être 
du type REAL. Cet identificateur est suivi du mot réservé OF. 
Nous venons de définir l'entête de notre instruction, il est à 
noter que celle-ci ne se termine pas par un <;>. 
Aligné sur notre mot clef CASE se trouve, quelques lignes plus 
loin, le mot clef END suivi de son < ; > signalant la fin de notre 
instruction. Entre ces deux mots clefs se trouvent 1 3 BLOCS 
dont 1 2 sont de structure identique et 1 d'une structure dif- 
férente qui peut ne pas exister mais alors cela peut, dans cer 
tains cas, donner des erreurs très difficiles à déceler. 
Les 1 2 blocs identiques sont, bien sûr, les 1 2 mois de l'an- 
née qui sont traités de manière similaire : le contraire serait 
logiquement inconcevable Chaque bloc est composé d'une 
valeur QUI DOIT ETRE DU TYPE CONSTANTE suivi du sépa- 
rateur <:>. lui-même suivi de l'instruction à exécuter (écrire 
sur l'écran le mois adéquat), elle-même suivie du séparateur 

< ; > qui sépare chacun des blocs. Cependant, pour des rai- 
sons que nous n'expliciterons pas ici DANS LA MESURE OU 
IL EXISTE UN DERNIER BLOC D'UN TYPE DIFFERENT DES 
PRECEDENTS, LE DERNIER DES BLOCS IDENTIQUES NE SE 
TERMINE PAS PAR LE SEPARATEUR <> 

Le dernier bloc est introduit par un mot clef particulier ELSE 
suivi par l'instruction a exécuter Vous pouvez noter que cette 
instruction devrait se terminer par un séparateur <;>, mais 
que dans la majorité des cas, les programmeurs ne le met- 
tent pas du fait d'une subtilité du PASCAL : l'ensemble 

< blanc > suivi des trois lettres <e> <n> <d> suivi d'un 

< blanc > est considéré par le compilateur comme un sépa- 
rateur, cela pour gagner quelques petites millisecondes à la 
compilation, cet avantage est moins nécessaire en PASCAL 
TURBO, mais se justifiait dans les versions précédentes des 
compilateurs PASCAL. 

Ce dernier bloc constitue une sécurité pour le programmeur 
en PASCAL. En effet, si jamais le programme donne à l'iden- 
tificateur qui suit le mot CASE une valeur bizarre non prévue 
par le programmeur, celui-ci en sera informé. En l'absence de 
ce filet, il peut dans certains cas se produire des choses pour 
le moins curieuses et vous risquez de passer de nombreuses 
heures avant de suspecter cette instruction, alors prenez tout 
de suite de bonnes habitudes et mettez votre ceinture de sécu- 
rité. 

Le programme 2 traite d'un autre exemple dans lequel il est 
demandé en entrée un caractère , en sortie, il est écrit sur 
l'écran la saison en toute lettre. Il s'agit en fait du même exem- 
ple que précédemment, mais appliqué à des variables du type 
CHAR comme le précise d'ailleurs le bloc déclaration. Vous 
noterez qu'il ne faut pas confondre l'identificateur <p> avec 
<'p> qui représente le caractère p. De toute manière, PAS 
CAL TURBO est sympa, il compile pour vous et vous signa- 
lera cette erreur. Bien sûr, vous pouvez lui faire une subtilité 
qu'il ne détectera pas : c'est d'avoir déclaré par ailleurs l'iden- 
tificateur <p> comme constante de type CHAR au préala- 
ble... (sans commentaire). ^ 
Le programme 3 nous ouvre d'autres possibilités quant aux 
possibilités de choix de valeurs que peut prendre la variable 
<car>. 

Le premier bloc traite des voyelles Comme elles conduisent 
toutes au même traitement, il est possible de simplifier l'écri- 
ture par une ENUMERATION de toutes les possibilités sépa 
rées par des <,>. 

Le deuxième BLOC traite le cas de chiffres. Il ne diffère du 
premier que par une disposition différente. Il faut se rappeler 



que PASCAL fait une distinction entre ligne éditeur et ligne 
PASCAL (voir articles précédents). Cela permet de compo- 
ser une agréable présentation et d'effectuer plus facilement 
des corrections plus aisées le cas échéant. 
Le troisième bloc traite le cas des symboles. ^' ' ..'/'? 
signifie à partir du caractère ^ blanc ^ jusqu'au caractère 
^/5- Le mot réservé est ^blanc^ $.s ^> ^ blancs et 
comme c'est un mot et donc un identificateur, il ne doit pas 
renfermer de séparateur à l'intérieur, ce qui signifie que les 
deux points doivent IMPERATIVEMENT ETRE COTE A COTE. 
Cette notation sera utilisée ultérieurement de façon intensive 
et est donc à connaître. Elle représente un INTERVALLE et 
ne doit pas être confondue avec la notation précédente 
l'ENUMERATION. 

Le quatrième bloc traite le cas d'autres symboles dont le code 
ASCII est compris, la valeur 58 et la valeur 64. Le caractère 
# signifie donc <caractère dont le code ASCII eat>. 
Le cinquième bloc est analogue au précédent quant à la cons- 
truction, mais les valeurs sont indiquées en hexadécimal 
comme l'indique le caractère <S> qui précède les valeurs 
5Bet 60. < HE-> se lit donc comme étant le caractère dont 
le code ASCII est 5B en hexadécimal. 

Le sixième bloc est aussi un INTERVALLE dont les bornes sont 
des identificateurs Ceux-ci étant déclarés comme constante, 
le compilateur les acceptera. 

IL EST EVIDENT QUE L'ORDINATEUR NE PEUT ACCEPTER 
DEUX SOLUTIONS A SON CHOIX POUR UN PROBLEME 
DONNE. IL NE PEUT DONC PAS ADMETTRE QU'UNE 
VALEUR D'OPTION SE RETROUVE DANS DEUX BLOCS DIS 
TINCTS. 
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INSTRUCTIONS SIMPLES 
INSTRUCTIONS MULTIPLES 

Nous venons de voir que chaque bloc de l'instruction CASE 
doit contenir une valeur CONSTANTE SIMPLE, ENUMEREE, 
INTERVALLE suivie du caractère < : > suivi D'UNE INSTRUC- 
TION qui se termine par le caractère < ; > , sauf celle qui pré 
cède le ELSE qui n'a pas ce < ; > . 

Ce n'est pas un hasard si nous avons mis en gras < UNE INS- 
TRUCTION >, car il ne doit y avoir qu'une SEULE INTRUC- 
TION entre < : > et < ; > . Mais celle-ci peut être simple ou 
multiple. 

Pour transformer une suite d'INSTRUCTIONS SIMPLES en une 
INSTRUCTION MULTIPLE, il suffit de faire de ces instructions 
simples un bloc qui sera ouvert par le mot clef BEGIN et qui 
sera fermé par le mot clef END, La figure 3 vous montre la 
syntaxe d'une telle transformation et le programme 4 vous 
donne un exemple d'utilisation d'instructions multiples dans 
l'instruction CASE. 
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LIMITES D'UTILISATION 
DE L'INSTRUCTION CASE 

L naît uLtion L.A5E est tr&s performante, elle permet de plus 
de disposer d'une présentation plaisante à la vue et facile à 
comprendre. Elle présente cependant deux limitations très 
sévères : la variable ne peut pas être du type REAL et elle 
n'admet que des choix constants non modifiables par pro- 
grammation. 

Comment s'affranchir de ces limitations ? De deux manières 
très différentes. La première consiste en l'utilisation ration- 
nelle des opérateurs booléens, la seconde consiste en l'utili- 
sation de l'autre instruction de débranchement conditionnel 
IF .. THEN .. ELSE. Mais comme une bonne utilisation de l'ins- 
truction IF THEN ELSE passe par la maîtrise des opérateurs 
booléens, il n'y a pas d'autres solutions que de se lancer dans 
cette étude. Mais que personne ne s'affole, ces booléens c'est 
simple et ça simplifie tellement les choses que pour un modi- 
que effort, nous allons faire un grand pas vers la structura- 
tion de notre programmation. 
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LE TYPE BOOLEEN 

Les booléens définissent en PASCAL un type, c'est-à-dire que 
PASCAL définit les objets que nous pouvons manipuler et les 
actions que nous pouvons effectuer sur ces objets. 
Tout d'abord, définissons les objets mampulables Ils sont au 
nombre de deux : VRAI et FAUX II est évident que les actions 
que nous allons pouvoir effectuer vont être très limités du fait 
du très petit nombre d'objets. Tant mieux, ce sera plus sim- 
ple. 

Définissons maintenant les actions possibles. Viennent en pre- 
mier, comme dans le cas des entiers, les opérateurs qui per- 
mettent d'effectuer des opérations sur ces booléens en défi- 
nissant des expressions booléennes comme nous avons défini 
des expressions arithmétiques. Ces opérateurs ne sont eux 
non plus pas nombreux puisqu'il n'y en a que trois de vrai- 
ment intéressant : <ET> ; <OU> ; <NON>. viennent 
ensuite les instructions que nous pouvons appliquer à ces 
variables booléennes, les principales sont l'affectation, la com- 
paraison et le classement. 
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iupérieur à 10000 F et qu'il est célibataire. La fi 
le le listing de cette proposition en PASCAL. 



LES OPERATEURS BOOLEENS 

• L'OPERATEUR ET - Si nous définissons trois variables boo- 
léennes p,q,r, et que nous affectons à p le résultat de l'ex- 
pression < p ET r > nous obtiendrons le tableau de vérité 
que nous montre la figure 4. Ce qui est à retenir, c'est que 
p est vrai si et seulement si <q est vrai> ET <r est vrai>. 

• L'OPERATEUR OU - Avec nos mêmes variables, si main- 
tenant nous affectons à p le résultat de l'expression < q OU 
r > , nous obtenons le tableau de vérité de la figure 5. Ce qui 
est à retenir, c'est que p est vrai si <q est vrai> OU <r est 

• L'OPERATEUR NON - Cet opérateur est un peu spécial 
car il n'agit que sur la variable qui suit, il est dit de ce fait 
OPERATEUR UNAIRE. La figure 6 nous donne le tableau de 
vérité de cet opérateur pour lequel nous affectons à la varia 
ble p le résultat de l'expression booléenne <NON q>. 



LES CLASSEMENTS 

Nous verrons qu'il est nécessaire d'établir un classement entre 
les deux objets de notre type. PASCAL le définit comme VRAI 
> FAUX. Nous pouvons mettre en évidence cette propriété 
en demandant à l'ordinateur de vous donner l'ordinal de vrai 
et de faux. 



Si vous affichez le résultat, vous aurez 1 pour a et pour 
b. Notre ensemble est donc bien ordonné. 



LES EXPRESSIONS BOOLEENNES 

Il est bien sûr possible de chercher à déterminer la valeur d'ex- 
pression booléenne plus compliquée du genre <q ET r OU 
v ET NON z >. mais alors, comme pour les opérateurs arith- 
métiques, il faut déterminer une priorité afin qu'il n'y ait pas 
de confusion. Les opérateurs booléens sont classés par ordre 
de priorité croissante OU < ET < NON. En cas d'égalité de 
priorité, l'expression est calculée de gauche vers la droite. 
Il est toujours possible de forcer les priorités en mettant des 
parenthèses, comme en BASIC d'ailleurs. Dans ce cas, le con- 
tenu des parenthèses est effectué en premier. 
Les figure 7 et 8 illustrent le mode calcul des expressions 
booléennes. 



LES OPERATEURS RELATIONNELS 

Ces opérateurs permettent de faire les tests, ils sont au nom- 
bre de six et sont donnés à la figure 9. Pour effectuer un test, 
il suffit d'écrire : 

résultat: =valeur.1 > .2 

Ce qui se lit affecté à la variable résultat la valeur du booléen 
obtenu par la proposition valeur _1 supérieur à valeur _2. La 
valeur de la variable résultat ne peut être que vrai ou faux : 
VRAI si valeur .1 est réellement supérieure à valeur .2 ; FAUX 
dans le cas contraire. 

Les variables valeur 1 et valeur 2 peuvent être de n'importe 
quel type, MAIS ILS DOIVENT TOUS LES DEUX ETRE DU 
MEME TYPE. 

Il est possible de faire agir en même temps les opérateurs rela- 
tionnels et les opérateurs booléens Par exemple, supposons 
qu'une personne soit imposable sur le revenu si son salaire 
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Listing 1 



t , ont put! ; 



1 et J.2 comprl 



i tein 
i tel n 
iteln 
rteln 
iteln 
îteln 
iteln 
iteln 
i t e 1 n 
iteln 
iteln 
iteln 
iteln 



( 'JANVIER 

( 'FEVRIER 

C 'MARS 

C 'AVRIL 

( 'MAI 

( ' J U I N 

( 'JUILLET 

( 'AOUT 

( 'SEPTEMBRE 

C ' OCTOBRE 

( 'NOVEMBRE 

( 'DECEMBRE 

( 'DESOLE IL 



N Y A QUE 12 MOIS' ) 



Listing 2 



pragram2 dnput , Dut put) ; 



hegi n 

write ( 'entrer un caractère 
| readln (caract) ; 



» 
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" -p' : wriisilr 

■n- ; w-tti'îlr 




Listing 3 



#127; 
char ; 



lie ('entrer un iraracter 
■adin (car ) ; 
ise car of 

' a ' , ' p ' , ' i ' i ' o ' , ' u ' , 

' 6;' I "t' a ' & ' , ' *5> * , ' ■ 

#59 . - #64 
Vf f.5B . . #$60 

i: min - . cma>; 



-iteln ir.ar , 

-1 teln (car , 

rifcsln (car, 

ritsln (car, 

r i tel n (car , 

nteln (car, 



e<st 



:bi*fre* ) ; 

symtîol e ' ) ; 
est un symbol e ' ) ; 
psI: un symbole*); 
est UF1 syinhol e ' ) 



wrlte?! n (car,' est. une consonne') 



Listing 4 



pmqram prnqram4 (input ,out.put ) j 



rt s char 



M|l 



( 'entrer un caracti 
■padln (caract) ; 
rase raract o-f 

'0' . . '9* : beqir 



iteln ('ce caractère est un chi -f-fre ' ) ; 
itein ('ce ch;i.f-fre est :',caract> 



31.3.63 beqm 

writeln ('ce caractère n ' ' est 
writeln ('ce caractère est 5 ' , 



end.© 



GESTION DE 
FICHIERS 



Ça v est I Depuis le temps qu'on l'atten- 
dait, il est enfin arrivé. Qui ?... Le nou- 
veau gestionnaire de fichiers d'adresses. 
Au feu les répertoires qui se cachent tou- 
jours au fond des tiroirs... Avec cet utili- 
taire, plus besoin de se lécher le doigt 
pour tourner les pages d'un carnet, non ! 
Maintenant, installez-vous devant votre 
micro, chargez votre disquette "PRGM" 
et après le traditionnel RUN. vous verrez 
apparaître le nom du fichier à créer. Ainsi 
vous pourrez, sans problème, répertorier 
vos amis, les adresses utiles et consti- 
tuer à usage professionnef, des listes 
clients, fournisseurs, sous-traitants etc.. 
Vous disposerez à cet effet d'un format 
standard. 

De toute façon, il n'est nul besoin de tou- 
cher â sa structure car elle conviendra, 
je pense, à tous les utilisateurs, En effet, 
pour chaque enregistrement, existent 
plusieurs rubriques. Le nom, le prénom, 
l'adresse (rue, avenue), le numéro, la 
ville, le code postal, le numéro de télé- 
phone et d'éventuelles remarques. Pour 
autant de détails, vous auriez dû utiliser 
une page entière de carnet. 

Etes-vous prêts à remplir votre première 
fiche ? C'est parti ! 

Tout d'abord, vous allez choisir dans le 
premier menu, l'option n° 2 qui vous 
permettra de saisir des données. Atten- 
tion, il est indispensable de saisir un nom 
dans la première rubrique, sans quoi le 
curseur restera immobile et vous ne 
pourrez compléter le reste de la fiche. Les 
autres rubriques ne sont pas obligatoire- 
ment remplies mais sachez que pour une 
recherche multicritères. il vous faudra par 



R. DESFOURNEAUX 

la suite, au moins deux rubriques com- 
plétées. En effet, si vous désirez, par 
exemple, sélectionner tous vos amis 
domiciliés dans votre département et 
possédant un microrordînatéur, vous 
n'aurez pas besoin de visualiser toutes 
tes fiches du fichier AMIS car, grâce à 
cette option multicritères, seules seront 
recherchées les fiches correspondantes. 
Résultat ; un gain de temps considéra- 
ble et la certitude "de n'oublier 
personne"... 

Votre première fiche est remplie ? Alors 
continuez, vous voyez c'est un jeu d'en- 
fant. Ahl vous avez fait une erreur lors 
de la saisie du nom et vous êtes déjà a 
la rubrique "code postai" ? Alors, reve- 
nez au menu principal en frappant simul- 
tanément les touches "contrôle" et 
"Q". Reprenez l'option 2 et répondez oui 
à la question qui apparaîtra puis donnez 
le numéro de la fiche à modifier. 
Ah t je vois que cet utilitaire vous a con- 
vaincu d'abandonner vos vieux carnets... 
Tant mieux. 

Mais j'y pense, je ne vous ai même pas 
dit que vous pouviez imprimet les fiches 
que vous désirez. Ce logiciel, vous l'avez 
compris, peut s'adapter à toutes vos exi- 
gences, que vous soyez débutant ou 
non. Lors de l'utilisation, vous serez 
peut-être un peu surpris de la présence 
de la rubrique "mise à jour et tri". Il 
s'agit, en fait, d'une option de tri par 
ordre alphabétique a l'intérieur du fichier 
et d'une simple mise à jour du compteur. 
Dorénavant, vous ne serez plus pardon- 
nable si vous avez égaré l'adresse de l'un 
de vos amis... Vous aurez simplement 
mis un peu de mauvaise volonté... 



SUPERMAA 

(Eutersoft) 



Sous ce titre quelque peu sibyllin, se 
cache un logiciel d'aide à l'apprentissage 
des échecs. J'ai bien dit apprentissage. 
En effet, le programme ne vous propose 
pas un affrontement homme-machine, 
mais une série d'exercices destinés à 
faire de vous les futurs champions dont 
la France a tant besoin. Après une page 
de présentation, on vous demande si 



vous possédez un moniteur couleur ou 
monochrome, puis si vous désirez récu- 
pérer la version originale du programme 
(en effet, il est possible de la sauvegar- 
der!. Le menu présente 10 choix. Les 
points ELO dont il est question dans la 
première option sont les références du 
niveau des joueurs. On vous apprend 
aussi qu'un débutant possède d'office un 



ELO de 1200 et que le champion du 
monde dépasse 2700. Le but du pro- 
gramme est de vous faire atteindre des 
sommets dans l'art échiquéen. 
La série d'option suivante concerne dif- 
férentes parties du jeu ; les titres étant 
d'ailleurs éloquents : astuces dans l'ou- 
verture, centre et percées, attaque sur 
le roquB, renforcement et défense, 7" 
rangée et pion passé, fins de parties. 
Chaque exercice vous donne une suite 
de mouvement sous forme symbolique : 
1d4. Cf6, 2c4, C5, 3d5 ! 
L'ordinateur vous donne ensuite le choix 
entre 3 réponses : A, B ou C. Selon votre 
réponse, le programme signalera vos 
éventuelles erreurs avec une explication 
sur la marche à suivre. Mais peut être 
que tous ces symboles vous semblent un 
peu abscons. Qu'à cela ne tienne, l'op- 
tion "J" vous offre une liste de vocabu- 
laire technique : ZUGZWANG ne sera 
plus un mot exotique, mais un terme des 
plus courants. 

Une fois complètement imprégné de 
l'univers de l'échiquier, il vous reste à 
reprendre des parties célèbres et à tes- 
ter vos "réflexes". Deux catégories de 
questions existent : avec ou sans échi- 
quier... Les parties avec échiquier se font 
au coup par coup. Les ouvertures se 
déroulent automatiquement. Puis votre 
tour arrive. Notez bien qu'il est préféra- 
ble d'avoir un échiquier réel à côté de soi 
afin d'effectuer les déplacements. A cha- 
que arrêt du programme, il faut imaginer 
la réponse possible. (N'oublions pas qu'ii 
s'agit de parties entre joueurs de haut 
niveau). En appuyant sur "-»" la solu- 
tion apparaît, il ne vous reste plus qu'à 
vous attribuer une note : si la réponse 
est mauvaise, 1 si le coup est moyen et 
2 en cas de franche similitude entre votre 
échiquier et celui présenté sur votre 
écran. 

Ces quelques tests effectués, vous pou- 
vez retourner au menu et contempler la 
progression de votre score. Si rien ne 
s'améliore, retournez vers les exercices 
et entraînez-vous intensément. 
Quelques critiques négatives, mainte- 
nant, la présentation n'est pas d'une très 
haute qualité et les débutants auraient 
peut-être souhaité avoir un peu plus de 
graphisme afin d'égayer ce programme. 
Mais nous sommes dans l'univers "spor- 
tif" des échecs et il est vrai que la fan- 
taisie doit céder le pas devant l'analyse. 




BAWC P'ESSA/ 



LOq/C/ELS 



CLASH 

ERE INFORMATIQUE 
Aventure 

La naissance dune nouvelle gamme 
de logiciels est toujours attendue 
avec impatience . aujourd'hui, c'est 
le tour d'Ere Informatique avec 
Clash qui démarre la gamme Métal 
Hurlant issue de la célèbre revue 

Situons rapidement le contexte de 
l'action : vous Mes Manuel, petit 
trafiquant de mobs ; vous êtes 
fraîchement sorti de l'ombre et 




rentrez tout content chez votre 
chère petite mère qui vous a 
sûrement mitonné un véritable petit 
festin pour l'occasion... 
Malheureusement pour vous, il n'y 
aura pas de fête ou alors cela va 
être la votre, car vous découvrez 
votre mère assassinée et, qui plus 
est, la concierge vous trouve avec 
l'arme du crime dans la main et 
elle appelle immédiatement la 



Avec ia tarouche énergie qu< anime 
chaque mr.ccent. il ne vous reste 
plus que reprendre contact avec 
vos anciennes connaissances pou 
recommandâmes afin d essayer de 
trouver la ou la coupable de ce 
cime odieux que l'on va essavei 
de vous coller sur le dos Mais 
aven! de commencer votre 
enquête, sachez bien qu'il va falloir 




être psychologue et tirer les vers 
du net ê vos copains" sans qu'ils 
s'en aperçoivent. 

Ap'ès une belle page ècien doublue 
a une agréable musique, vous 
entiez dans >e feu de l'action avec 
un écran partagé en quatre parties 
principales '-a tenève présentant 
le lieu où vous vous trouvez, celle 
où apparaissent les personnages, 
celle ou vous pouvez dialoguer et. 



pour terminer, la fenêtre où vous 
pouvez sélectionner une icbne pour 
agir leiamen. dialogue, fuite . ! La 
réalisation de ce logiciel est 
soignée avec un graphisme net qui 
a peut êtie e désavantage de ne 
pas occupei une olace plus 
importante Somme toute, une 
gamme qui démarre bien et qui 
vous permettre de pesse' quelques 
Donnes heures 



CREMLIN GRAPHICS 
Arcade/Aventure 

Il est un problème qui existe 
depuis la nuit des temps et que 
- ■ .■:■■'■■- n est encore pervenu ê 
résoudre il s'agit du perpétuel 
affrontement entre la Bien et le 
Mal. Seulement, si vous vous 
engagez dans les forces de Mesk. 
vous pounez combattis les 
reoou tables Veroms qui n'ont 
qu'un seu^but : ebominer le 

Avant d'atteindre le base des 
Veroms que vous devez détruire 
luialement. vous evez tro-.s 
endroits è 'visite'" afin de sauve' 
cinq autres agents Pour arriver a 
vos fins, vous devez commencer 
par localiser et act ver le scanner 
qui vous indiquer l'endroit où se 
trouve l'agent è libérer Po„r cela, 
i. faut ramasser les morceaux 
permettant de reconstituer la dé 
de sécurité. Ensuite, l'agent étant 
libéré, vous devez ramasser son 
masque.. Bien entendu, auel que 
sait l'endroit visité, il y a tou|0urs 
des ennemis dévesteteurs de tous 
bords qui prennent un malin pi ai Sir 
A détériorer votre vaisseau ; aussi. 



vous sb:m bien heureux de trouver 
des truusses ê outils qui vuus 
permettront de poursuivre votre 

Le nouveau ieu d'arcade aventure 
vous captivera une fois que vous 
aurez découvert toutes les options 
de Mask le graphisme r'ast pas 
particulièrement génial, mais 
ranimât ion traduit un phénomène 
d'mertiu sur votre vaisseau qui 

i i' une difficulté 

supplémentaire.- Ah. un dernier 
détail . votre mission est 
chrnno'nètrée alors pas de tnmps î 





beau 



EXOLON 

HEWSON 
Arcade 



Depuis des jours et des jours que 
votre voyage a commencé de ne 
dirais pas des lunes puisqu'il l'y 
en a pas dans le système où vous 
évoluez !|, vous désespérez de 
pouvoir poser votre astronef 
quand, soudain, vous apercevez la 
tm du voyage . 
Seulement, dès que vous pointez le 



bout ce votre nez. ies tirs 
commencent ir s ■ ai i : a i iê nei" i 
c'est rangoisse car vous avt 
oossèder neuf vies, c'est loin 
d'être l'immortsiitè I Alors, vous 
avez le choix antre deux modes de 
ripostes le pistolet ou les 
grenades, ces dernières eyant 
l'avantage de traverser égelement 
les murs épais ou les paruis 
rocheuses. . Malgré tout, si les 
ennemis s'evèrent nombreux, 
puissants et indestructibles, alors 
n'hésitez pas è utiliser votre 
armure hvper blindée 
l'exoskeleton qui est manœuvré de 
manière hydraulique et qui vous 
assure protection contre presque 
tout (excepté les canons les plus 
puissants}. 

Exolon peut être qualifié de jeu 
d'arcade classique présentant les 
caractéristiques su i vent es ; bon 
graphisme constituant des écrans 
très colorés avec une animation 
correcte quoique pas très rapide. 
La progression s'effectue de 
manière linéaire et vous avez la 
possibilité de faire le plein 
d'énergie et de grenedes en chemin 
|ce qui n'est pas négligeablel. Pour 
terminer, citons un avantage de ce 
logiciel : la possibilité d'avoir accès 
à une multitude d'écrans... 



BA/VC P'SSSA/ 



loq/c/fis 



WONDER BOY 

ACTIVISION 
Arcade 

Une nouvelle fois, voici une 
adaptation de jeu de café; les 
résultats obtenus ne sont pas 
toujours des plus réussis et nous 
en avons ici un exemple. 
Woodtir Boy est un Tarzan haut 
comme trois pommes, qui posséda 
un courage sans limite pour se 
porter au secours de sa belle. Car 
figurez vous pua la pauve Tins 
s'est fait enlever par le plus 
malfaisant des personnages de la 
jungle, qui fait régner la terreur 
sur tous les habitants I 
Notre Tarzan, tout blond, 
commence sa dure mission en 
pleine forêt et rencontre un œuf 
lami oo ennemi?); heureusement 
pour lui, tous ces œufs vont 
l'équiper de différents objets : 
skale board, hache ou même ange 
gardian. Il en aura bien besoin car 
tout lui est hostile et mortel par 
simple contact : blocs de pierre, 
abeilles, escargots ou serpents. . 



Seulement, Won de r Boy est comme 
tout un chacun : ne pouvant se 
satisfaire d'amour et d'eau fraîche 
pour conserver sa vitalité, il devra 
attraper les fruits qui apparaissent 
de temps à autre... 
Bien que ce jeu ne manque pas 
d'intérêt, vous serez sans aucun 
doute déçu par le choix des 
couleurs qui sont un peu ternes ; 
le scralling, quant à lui, s'avère 
être un peu saccadé mais il faut 
noter que le graphisme est plus 
que correct et qoe vous avez 112 
décors différents à votre 



LES DIEUX 
DE LA MER 

INFOGRAMES 
ArcadelSimulation 



Alors que le championnat du 
monde de ski nautique s'est 
déroulé du 17 au 20 septembre à 
Londres, Infogrames a devancé 
cette manifestation de quelques 
skis en nous proposant cette 
simulation qui mérite fortement 
que nous y jetions un coup d'œil. 
Comme tout bon championnat qui 
se respecte, vous devez accomplir 



les trois épreoves imposées 

suivantes: le saut, les figures et 

le slalom pour terminer en 

apothéose... 

Pleinement concentré, vous vous 

présentez pour la première 

épreuve ; un petit coup de joystick 

le tremplin... Le plus dur sera de 
rester équilibre en l'air pour ne pas 
prendre une tasse mémorahle à 
l'arrivée I 

Ayant effectué vos trois essais 
pour l'épreuve du seut, vous vous 
engagez dans celle des figures : 
pour commencer en douceur, vous 
vous permettez un petit dérepage 



ULTRON 1 

CHIP 
Arcade 



La comète de Helley. vous vous en 
soovanei ; Elle avait dèjè fait 
parler d'elle en 1985 et 
aujourd'hui, cela recommence, mais 
en pue I... En effet, en cette 
année 2062, ;a Terre récupère de 
I énergie en captant les vents 





puis vous osez un demi tour, un 
tour complet et enfin un 540° 
STEP. c'est è dire, un tour et demi 
avec une iembe passée au dessus 
de le corde de traction pendant la 
rotation (magnifique I; 
Vous terminez votre chempionnat 
par le slalom où il n'y a qoe B 
bouées è passer peut être, meis ie 
parcours s effectue très, très 
■api dément I 

Vous serez enchanté par ce logiciel 
qui a l'avantage d'allier qualités 
graphiques et d'animation è une 
présentatiun attrayante ; alors, un 
conseil, n'ayez pas peur de vous 



Etant chargé de guider le robot 
dans la base, vous découvrez une 
granoe difficulté . le déplacement 
du robot se fait comme s'il était 
ons toupie (contra la délicat i et le 
moindre erreur se solde par une 
formidable explosion. Oe plus, la 
base présente des passages étroits 
et semés d'embûches, le tout sur 
fond de losanges. 
Les premiers essais de ce logiciel 



vous mèneront sens doute è le 
conclusion ce n'est pas jouable I 
En effet, étant donné le difficulté 
qoe l'on rencontre poor cont râler le 
robot, le fin du jeu est toujours 
très rapide. Malgré toot. avec un 
peu d'entraînement, vous pourrez 
progresser sur cette base 
fortement géométrique et un peu 
austère, car la persévérance paie 
toujours 



solaires è partir d'une base 
spatiale. Seulement, le 
fonctionnement de cette base a 
été perturbé par le passage de la 
comète de H al la y. 
La base risquant d'exploser à tout 
instant, un robot télécommandé est 
envoyé lé-bas afin de récupérer 
trois cyclotrons désectivateurs. 




BANC PZSSA/ 



LOq/C/£LS 



CHARLY DIAMS 

LORICIELS 

Arcade /A venfure 

Le temps notent plus è la ruée 
vers l'or depuis fort longtemps, 
Charly e décidé de partir a la 
conquête des mille diamants bleus 
pouvant lui garantir une retraite 
immédiate et plus que 
confortable... 

Seulement, la cachette où sa 
trouve cette petite fortune est loin 
d'Être accessible et il va falloir 
énormément voyager. De plus, 
l'acheminement vers la richesse se 
fait par étapes, car il faut réunir 
sept fleurs et pas n'importa 
lesquelles puisqu'il s'agit de fleurs 
miraclBS L 





C'est ainsi que Charly 
son périple en plongeant dans le 
Golfe du Bengele lettention, il ne 
faut pas oublier de se mettre en 
tenue de bain 1...). Avec de pareils 
décors aquatiques c'est bien Ib 
diable s'il ne réussit pas à trouver 
une fleuri Ensuite, commence la 
longue, pénible Bt très éprouvante 
traversés du désert du Té né ré ou 
il faut échapper au redoutable 
Ayatollah... 



Mais il reçoit une belle lécompense 
eu bout de cette terrible épreuve 
en la personne de Roubia, port buse 
d'eau qui lui partit Bt d'obtenir 
quatre fleurs en une seule fois !.. 
Bref, avec ce tout dernier jeu 
d' arcade /aventure de Loriciels, vous 
allez en voir de toutes les 
couleurs.... Avec un graphisme 
soigné, haut en couleurs, 
présentant des paysages très 
divers (m sis attention, nous 
restons toujours dans le style 
arcadel. La musique, quant à elle, 
présente, par moments, quelques 
réminiscences de Zox 2D99. 



CANADAIR 

FIL 
Arcade 



Ce logiciel fait référence à un 



plaça é bord d'un de cas avions et incendie éteint, vous devei vérifier 
de vous transformer en "pompier le niveau de vos réservoirs d'eau 

volant" sans peur et sans reproche at aller les remplir le ces échéant. 



pose cruellement tous les étés : c 
sont las incendies de foret... 
Canadaii vous proposa de prendre 



afin de repérer et d'aller 
héroïquement éteindre tous les 
(eux, 

Après avoir pris suffisamment de 
vitesse at décollé uns encombre, 
vous repérez votre premier lieu de 
million an le localisant sur la 
carte ; ensuite, après chaque 




La but du jeu sera d'éteindre le 
maximum d'incendies an un 
minimum de temps, tout en étant 
un virtuose du manche car l'espace 
aérien n'est plus ce qu'il était : il 
règne un de cas trafics... I 



A première vue, le sujet semble 
intéressant, mais il y a de grandes 
chances pour que vous soyez un 
peu déçu par la graphisme du jeu : 
par contre, la page de présentation 
accompagnée d'une synthèse 
vocala ait bien réunie... Un autre 
petit détail : » vous avez une 
impression da déjà vu, ne vous 
posez pas la question da savoir où 
vous avez des prémonitions car en 
cherchant bien, vous trouverez 
certainement son frère jumeau (ou 
presque 1). 



WIZBALL 

OCEAN/US GOLD 
Arcade 

Osez pénétrer dans un monde tel 
que celui de Wiz et vous 
comprendra? enfin ce que peut 
être un univers sens couleur : tout 
simplement un contexte gris, terne, 
triste et sans saveur.. 
Vous n'allez certainement pas 
laisser Wiz dans cet état I C'est 
pourquoi vous sautez dens voire 
transporteur avec votre inséparable 
chat CatBlitB at foncez è la 
recherche des gouttelettes bleues, 
rouges au vertes indispensables 3 
la restitution des couleurs. 
Malheureusement, vous vous 
rendez vite compte qu'evec votre 
apperence toute ronde, vous avez 
du mal à vous contrôler. Mais il 
suffit de percer le secret de 
certaines des créatures étrangères 
qui peuplent l'univers de Wiz, pour 
gagner quelques propriétés... 




En effet, lorsque certains ennemis 
sont tués, ils déposent une perle 
verte qu'il vous suffit de ramasser 
pour avoir accès è des icônes qui 
vous permettront d'obtenir un 
meilleur contrôle de vous-même... 
C'est par ces mimes icônes que 
CatelitB pourra vous rejoindra pour 
aller ramasser les gouttelettes de 
couleur. 

Wizball est un logiciel qui a 
l'avantage d'être original, attrayant 
et bien réalisé. Par contre, avant 
que vous ne perdiez patience, je 
vous donne un truc pour 
sélectionner une icbne : Wizball 
effectuent un mouvement vertical, 
vous devez faire subir è votre 
joystick on mouvement latéral très 
rapide... 



BA/VC P'ESSA/ 



L0$/C/EL8 



INDOOR SPORTS 

DAJABYTEiUBI SOFT 
Simulation 

Pour tous ceux qui ne sont pas de 
fervents adeptes de sports en plein 
air, pour cause de vent, pluie etc., 
nous leur proposons de s'exercer è 
des sports en salle, quatre pour 
être précis et, qui plus est, an 
étant confortablement installés 
dans leur fautBuil dotant leur CPC 
Après avoir entré tous les noms 
ries joueurs (vous pouvez jouBr à & 



en sachant que vous ne serez que 
2 joueurs à la fois), vous pouvez 
commencer par une partie de 
howling, pour vous mettre en 
condition... Bien que la réalisation 
soit correcte, vous serez peut être 
gêné par la fait qu'un lancer de 
boule se fait sur deux écrans: un 





pour la départ et un pour visualiser 
les quilles... 

Ce système de deux écrans se 
retrouve également pour le jeu de 
Fléchettes : un gros plan sur la 
cible pour orienter votre tir et une 
vue globale de toute la pièce pour 
voir le résultat final. 
Lorsque vous 



troisième sport, vous prenez un 
coup de frais car il s'agit de 
"hockey aèriBn" où il vous faudra 
faire preuve d'énormément de 
réflexes et d'habileté car c'est 
vraiment très, très rapide !.. 
Non contents d'avoir pu sa 
défouler de façon agréable sur ces 
trois jeux, les Amstradistes nnt 
l'honneur et l'avantage de pouvoir 
faire une partie de ping-pong en 
prime, classique mais toujours 
agréable è retrouver... Somme 
toutB, un logiciel qui vous 
procure re plaisir et variété. 




une planche è roulettes et il se 
repprocha, se rapproche 
dangereusement... Mais, comme 
d'habitude, je serai la plus fort. 
BeepBeep ! 

Lorsque vous découvrirez ROAD 
RUNhER. vous serez peut-être 
nai, .- par la qualité du graphisme 



(surtout si vous en evez déjè vu 
d' outres versions... I. Par ailleurs, 
vous remarquerez très rapidement 
que le jeu se décompose de 
manière alternative de parcours 
rectilignes très faciles et de 
perceurs parfois difficilement 
franchissables. Par contre, pour ce 
qui Bst de l'animation, vous serez 
pleinement satisfait par le degré 
de vélocité que peut atteindre ce 
cher Beap-Beepl... 



dessins enimès'.- Road Runer 
nous est enfin parvenu et c'est 
evec une grende fébrilité que j'Ôte 
le film plastique protégeant la 
disquette. 

Je prends aussitôt un départ 
fulgurant et laisse sur pièce cet 
imbécile de coyote En pleine 
ligne droite f aperçois un immense 
tas de g reines que j'avale en 
pestant ; pendent ce temps, le 
AMSTRAD d'un des plus célèbres coyote e déniché (je ne seis oui. 



ROAD RUNNER 

US GOID 
Arcade 




Catalogue 

£9 impression de catalogue de disquettes 
n'est pas très complexe et nous avons déjà publié 
I (CPC 14) un utilitaire qui faisait ça très bien. Voici, 
cependant, un petit programme qui vous donne le choix 
entre une impression sur une. deux ou quatre colonnes et 
vient donc apporter un "plus" à ce programme. 



Nous sommes certains que te retour d 
provoque un tas de bonnes résolutions, dont celle, 
capitale, de remettre bon ordre au fouillis de disquettes 
non cataloguées que vous avez laissées en plan pour 
satisfaire votre appétit de soleil. Ce petit programme, que 
vous devez à Maurice Tollu, de Besançon, vous rendra 
donc les meilleurs services. 



BOITE A OUTILS PC 



Un outil, forgé entièrement à la main et dans les meilleurs 
aciers, par J.P Caron. Les explications sont dans le 
programme 



Pierre TACONNET 



J.P Caron, qui travaille sur PC 1512 AMSTARD gonflé à 
640Ko + FD3 + Business card TANDON, a ajouté cette 
routine au listing n° 6 de Michel Archambault, page 49 
de PCompatibles n° 3 



INTERVALLES 2 



Dans CPC. 23 figurait un programme de calcul 
d'intervalles entre dates auquel il est bon 
d'apporter quelques précisions. Tout d'abord, c'e 
fncj qu'il faut lire dans le REM de la ligne 30. Ensuite, 
c'est par la différence entre les deux codes du jour 
(toujours FNcj) que l'on obtiendra le nombre de jours 
entre les deux dates. Maintenant, cela devrait 
fonctionner. 



FACTORIELLES 



La rentrée des classes, le nouveau prof de maths... Bref, 
la routine qui reprend. Utilisons donc notre cher CPC pour 
nous dégager des tâches rébarbatives. Frédéric Herrade, 
de Roquemaure (que cette ville fleure bon les vacances II 
vous offre ce petit programme. 



Vous aviez peut-être oublié que N doit être un entier 
positif (les vacances I!, la ligne 40 vous le rappelle. 



TRUCS ET ASTUCES 

MAITRISEZ 
VOS IMPRESSIONS 



Nous sommes Ses autours du programme 

"Impression", distribua par ESAT Software et 

nous aimerions faire profiter les (acteurs de 

CPC de quelques trucs leur permettant de tirer 

le meilleur parti de ce logiciel. 



Profitant de notre expérience dans le 
domaine de l'impression, il nous apparaît 
comme judicieux de configurer votre 
imprimante comme suit, à l'aide des 
sélecteurs DIP : 

- Zéro barré 

- Jeu de caractères USA 

- Bip actif 

- Papier 1 1 ou 12 pouces (selon votre 
papier). 

(référez-vous au manuel de votre 
imprimante...) 

L'initialisation de votre imprimante peut 
se faire sans couper l'alimentation de 
celle-ci à l'aide de la fonction RSX; I INIT 
(en mode direct ou en mode 
programme). Ceci peut s'avérer très utile 
dans un programme BASIC pour annuler 
les effets d'une séquence préalablement 
envoyée sur l'imprimante. Le gain de 
place est surtout appréciable lorsque 
vous avez plusieurs commandes à 
annuler. Après l'initialisation, la 
configuration de l'imprimante est 
imposée par le positionnement des 
sélecteurs DIP. 

Avant toute impression, vérifier que la 
longueur des pages est bien la même que 
celle sélectionnée par les DiPs (très 
important pour les sauts de page), sinon 
utiliser la commande I LONGPAGP.p où 
p représente la longueur d'une page en 
Pouces. 

La commande I PAGSUIV vous 
permettra de passer automatiquement à 
la page suivante. 

Lors d'une séparation volontaire ou 
.accidentelle de vos pages de listing, 
certaines lignes imprimées sur les 
perforations du papier se trouvent 
détruites. La commande I PERFO,n (n 
représente le nombre de lignes à sauter) 
effectuera un saut de n lignes en bas de 
page. Une solution que nous considérons 
e très bonne est n = 5. 



Si vous avez déjà été accusé de .-page 
nocturne à cause de votre imprimante, 
voici une solution qui diminuera 
sensiblement le niveau sonore de celle- 
ci. Utilisez pour cela les commandes 
I UNID et I DEMIV. 



Il est parfois utile de pouvoir lire se qui 
se trouve momentanément caché par le 
ruban de votre imprimante, ceci est 
possible grâce à une commande que 
vous n'avez peut-être jamais utilisée et 
qui se nomme I INC. 
Vous serez surpris du résultat ! 



Pour les tilisateurs de TURBO PASCAL 
(vous £(88 de plus en plus nombreux), 
avant tout listing, sélectionnez le jeu de 
caractères USA et le mode condensé : 
I CARACT,0: I COND 
Vos listings garderont ainsi leur 
présentation initiale (longueur des lignes 
respectée, crochets et accolades...! 

Pour obtenir une représentation fidèle de 
vos listings BASIC, il existe deux solution 
selon le type de clavier dont vous 
disposez ; si vous possédez un clavier 
AZERTY (français), il vous faudra 
sélectionner le jeu de caractères français 
(ICARACT.l) par contre, si vous 
possédez un clavier QWERTY (USA), il 
vous faudra sélectionner le jeu de 
caractères USA II CARACT.O) 

Pour les traitements de textes et pour 
avoir une écriture se rapprochant le plus 
de la qualité courrier, il vous faudra 
utiliser la séquence suivante ; 
I CARACT.1: I NLQ: I PROP 

Economisez environ un tiers de papier en 
faisant imprimer vos listings grâce à la 
séquence d'instruction suivante : 
I COND: I IND: I ALIMO: I PERFO,3 
Ceci est très intéressant pour la 
réalisation de listings destinés à 
l'archivage. 



Remarque : 

Une erreur s'est glissée dans la notice 
d'utilisation d'IMPRESSION, les 
instructions I ALIM1, I ALIM2, I ALIM3 
sont â remplacer par les instructions 
suivantes : I ALIMO, I ALIM1, I ALIM2. 

Pour faire des recopies d'écrans 
partielles, il peut s'avérer utile de ne pas 
tramer l'écran lorsque le morceau 
d'écran è recopier n'est composé que de 
2 ou 3 couleurs. 



Surtout n'oubliez pas d'utiliser cette 
instruction qui ne figure pas dans la 
notice I AUTEURS. 



nie 



ell : 



Au retour du message de bienvenue 

d'IMPRESSION et du Ready, tapez en 

mode direct. 

CALL &BBOO ; ceci restaure la touche 

ESCAPE et le clavier en général 

CALL &BB4E:CLS ; pour avoir la 

possibilité d'utiliser IMPRESSION avec 

des caractères redéfinis. 

MEMORY &8500 ; pour avoir un 

maximum de place disponible pour vos 

programmes. 

La disquette IMPRESSION, comme vous 
avez pu vous en apercevoir, n'est pas 
copiable avec CP/M. Toutefois, il est 
possible de réaliser des copies de 
sauvegardes, ce que nous vous 
conseillons, avec le logiciel HERCULE 






■nple. 



La protection ne remet pas en cause la 
place disponible sur la disquette. Il est 
possible de sauver vos applicatiions sur 
la disquette IMPRESSION tant qu'il reste 
des octets de libre. 

Nous vous proposons un petit 
programme utilisant les commandes 
I MTRAME. I MCOPYTRAME, 

I COPYPART, I DOUBLECOPY, 

I COPYTEXTE, I COULEUR. 



30 IF m<0 or m>2 then 10 

40 INPUT "Nom de page à charger : 
",nom$ 

50LOADnom$, SCOOO 

60 I MTRAME 

70t8 = INKEY$ 

80 IF t$ = "1 " THEN I COPYPART 

90 IF t$ = "2" THEN I MCOPYTRAME 
100 IFt$="3" THEN I DOUBLECOPY 
1101F t$ = "4" THEN I COULEUR 
120 IF t$ = "5" THEN I COPYTEXTE 
130 IF t$> = "1" AND t$<="5" 
THEN 70 
140 END. 



Ability 
Phis 7 



Si la vogue n'est plus guère aux logiciels 
intégras, la faute n'en revient pas a une 
quelconque faiblesse du concept d'inté- 

3 ration, mais plutôt aux sociétés éditrices 
e logiciels qui n'ont jamais respecté le 
cahier des charges que partiellement. 
MIGENT, éditeur de ABILITY Plus, vient de 
réussir là où bien d'autres avalent, peu ou 
prou, échoué. 



L'idée de logiciel intégré est intéressante 
puisqu'elle permet aux entreprises de 
disposer d'une base de données, d'un 
tableau, d'un éditeur de texte et d'un 
grapheur et ce, en un seul logiciel. Bien 
sûr, il ne suffit pas de placer dans la 
livraison quatre logiciels de fonctions 
diverses pour obtenir un intégré. Encore 
est-il nécessaire de rendre possible 
l'échange des données entre les fichiers 
des différents programmes. C'est sur 
cette notion d'interactivité que nombre 
de logiciels achoppaient. C'est cette inte- 
ractivité qu'ont su organiser les auteurs 
de MIGENT 

Si les avantages du procédé sont évi- 
dents ■ concision, cohérence, prix, for- 
mation réduite etc. les inconvénients 
n'en sont pas moins présents et l'occu- 
pation de la mémoire par les 4 logiciels 
n'est pas le moindre. 
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ABILITY Plus, qui n'est pas le plus gour- 
mand, nécessite tout de même 384Ko 
de mémoire minimum. Le pourcentage 
de mémoire disponible est d'ailleurs affi- 
ché en permanence à l'écran. Toutefois, 
lorsqu'une application manque un peu 
trop de place, il est toujours possible de 
fermer un fichier inutilisé. ABILITY Plus 
réclame également un écran, une carte 
et une imprimante graphiques. Certaines 
applications ne peuvent tourner sur écran 
texte et les graphes ne sont pas obtenus 
à l'aide de caractères du jeu courant. La 
prise en compte d'un éventuel coproces- 
seur mathématique 8087 est automa- 
tique. 

L'installation et l'initialisation, qu'il est 
préférable de réaliser sur disque dur, ne 
posent pas de problème, hormis, sur les 
ordinateurs ne possédant pas de disque 
dur mais une mémoire virtuelle, l'adap- 
tation d'un fichier batch. Signalons, en 
outre, la prise en compte de la souris. 
Reste l'adaptation du logiciel à l'impri- 
mante ou au traceur qui est rapidement 
réalisée en choisissant parmi les nom- 
breuses marques et types proposés. Il 
existe également une table de traduction 
qui permet de recoder les caractères 
(utile notamment pour les caractères 
accentués). Tous les formats d'affichage 
sont modifiables. 

L'ECRAN DE CONTROLE 

Au lancement s'affiche un écran de con- 
trôle qui nous propose un catalogue actif 
Sur la ligne supérieure figurent les diffé- 
rentes fonctions du logiciel : base, 
tableur, grapheur, éditeur (traitement de 
textel, comms, programmes et fichiers. 
Sous chacune des fonctions s'affichent 
les fichiers en rapport avec cette fonc- 



tion. Il suffit, à l'aide des flèches du pavé 
numérique, des touches de contrôle ou 
encore de la souris, de placer le curseur 
sur le fichier que l'on désire traiter pour 
que celui-ci soit chargé. Une case "nou- 
veau" est sélectionnée de la même 
manière pour les cinq premières options. 

Sur un bandeau, en bas de l'écran, s'af- 
fichent le lecteur de disque actif, les 
témoins de touches, l'option DUO et le 
pourcentage de mémoire disponible. 
Sous ce bandeau, l'attribution des tou- 
ches de fonctions qui conservent leur 
usage quel que soit le programme qui 
fonctionne, ce qui assure une grande 
facilité de mémorisation et donc, d'ap- 
prentissage. F1 aide, F2 menu, F3 cher- 
cher. F4 éditer champ, F5 copier, F6 col- 
ler, F7 sélectioner, F8 cale/dessin, F9 
duo, F1 fin. C'est par F2 que l'on sélec- 
tionnera les sous-menus de chaque fonc- 
tion qui eux-mêmes ouvriront sur d'au- 
tres sous-menus. C'est par la touche F9 
duo que l'on mettra les différents docu 
ments en liaison : inclusion d'un graphe 
dans un texte, par exemple. De plus, il 
est possible de présenter simultanément 
deux documents à l'écran (superposés 
ou juxtaposés), la touche F9 permet alors 
de passer de l'un à l'autre. 
Il est réellement agréable d'utiliser ABI- 
LITY Plus. On pourrait presque dire que 
ce logiciel fonctionne sous un intégrateur 
(toutefois sans fenêtres ni menus dérou- 
lants) tant la présence de l'écran de con- 
trôle est ressentie comme un pivot 
autour duquel s'articulent de façon par- 
faitement cohérente les différents 
logiciels 

L'EDITEUR 

C'est à l'éditeur qu'aboutissent tous les 
travaux et c'est avec lui que se peaufi- 
neront les rapports. De beaux rapports, 
d'ailleurs, où figureront graphe: 
tableaux au milieu d 



pression agrémentée de caractères gras, 
soulignés, italiques, etc. L'éditeur est 
graphique, ce que l'on voit à l'écran est 
donc ce que l'on obtiendra sur le papier. 
Les pages sont matérialisées par des 
bandes épaisses, ce qui facilite la mise 
en page. On trouve dans ce traitement 
de texte les fonctions classiques : justi- 
fication, insertion, déplacement de blocs, 
interlignage et même un correcteur 
orthographique (mais pas syntaxique! en 
français I Pas de césure, par contre. Il est 
impossible de réaliser du publipostage. 

Il est extrêmement facile d'inclure dans 
le texte des données du tableur, ou des 
graphes du grapheur. Ces données peu- 
vent même rester actives, c'est-à-dire 
qu'elles peuvent continuer à subir les 
effets d'une modification entreprise dans 
un autre programme. Seule réserve : le 
volume de texte est lié au volume de 
mémoire disponible. C'est sans doute 
pour cette raison que l'on nomme le pro- 
gramme, éditeur et non traitement de 



ABILITY Plus offre 702 colonnes sur 
9999 rangées mais l'on se demande 
comment on peut exploiter totalement 
ces capacités, compte-tenu de la 
mémoire disponible ? Les cellules sont 
nommées "champs" Cela résulte de la 
manière qu'a ABILITY Plus de considé- 
rer les données dans ses programmes. 
La clé de cette intégration réussie est 
précisément cette notion de "champs". 
Quel que soit le programme Itexte, cel- 
lule du tableur, graphe), toutes les uni r 
tés de données sont reconnues comme \ 
étant des champs, ce qui permet leur 
interchangeabilité et leur modification 
dans chaque programme quand on ne les 
a transformées que dans l'un d'eux. 
Le tableur, qui est fréquemment la pièce 
maîtresse des logiciels intégrés, dispose 
de fonctions très puissantes : fonctions 
mathématiques, logiques, trigonométri- 
ques ou financières. Toutes les fonctions 
classiques d'un tableur sont présentes 
avec quelques "plus" comme les réfé- 
rences circulaires qui viennent complé- 
ter les références absolues et relatives ou 
le verrouillage des champs. 

LA BASE DE DONNEES 

Une base de données qui serait classique 
si elle ne bénéficiait pas de la possibilité 
d'importer des données des autres pro- 
grammes. Regrettons tout de même l'ab- 
sence de possibilité de programmation. 

Le point fort de cette base de données 
est sa capacité à lier deux fichiers pour 
en créer un troisième virtuel. Ce procédé 
permet ainsi, par exemple, de lier un 
fichier "clients" et un fichier "achats" 
pour obtenir, sur une même fiche, une 
facturation complète. 

Autre point intéressant, l'élaboration des 
masques de saisie bénéficie outre des 
fonctionnalités de l'éditeur, de la correc- 
tion orthographique. 

LE GRAPHEUR 

Avec le grapheur, nous disposons de 5 
types de représentations : simples bar- 
res (présentation horizontale ou verti- 
cale), barres empilées, lignes Icourbes), 
camemberts et graphes orthonormées 
XY. 

La provenance des données est. bien sûr, 
multiple : clavier, ou tout champ existant 
(feuille de calcul, base de données). La 
présentation bénéficie de l'écran graphi- 
que et les caractères sont affichés en 
italique. 

COMMS 

Comms est un programme de commu- 
nication qui permet d'établir une liaison 
avec un autre ordinateur dans les mêmes 
locaux ou à l'extérieur par modem. Le 
paramétrage est aisé. 
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PRESENTATION 

Il s'agit d'un programme externe qui per- 
met la présentation sur écran d'une suite 
de pages écrans où peuvent figurer du 
texte et des graphes de toute sorte. Ce 
programme est d'autant plus spectacu- 
laire qu'il travaille en musique ! De nom- 
breux airs en tous genres sont mémori- 
sés, y compris la marche funèbre de 
Chopin. Sans doute pour se réjouir de 
l'échec d'L 



MACROS 

Le programme met à la disposition de 
l'utilisateur une vingtaine de macros : 
fonction gosub, affichage de menu, 
attente, automatisation de fonctions 
diverses etc. Les macros préprogram- 
mées constitueront un bon exemple pour 

sont donc programmables mais ne cons- 
tituent, toutefois, qu'une maigre com- 
pensation de l'absence d'un vrai langage 
de programmation. 

CONCLUSION 

Cette première version de ABILITY Plus 
est assurément une réussite. Son utilisa- 
tion est très agréable et, dans ces con- 
ditions, comment ne pas céder quand, à 
ces arguments, s'ajoute celui, imparable 
et décisif, d'un coût que nous osons qua- 
lifier de modique ? 



